

























































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































40 
A DIGITAL ie eee 


PROFESSIONAL ASTROLOGER .. . £49.95 


An astounding 300k of text files - automatic character and personality delineation, automatic natal chart, transits and progres- 
sions with corresponding text output allowing prediction, forecasting and day-to-day horoscopes. Takes full account of Houses, 
Aspects, Signs, Planets, Ascendant, MC, Eclipses and so on. Improved accuracy. User-variable orbs for aspects. User-definable 
House System (Placidus/Equal House etc). User-definable astrological character set full screen editor supplied for user 
modification of all text files, and/or logic supported. Large, comprehensive A4 manual supplied. Compatibility-testing for two 
people. A brilliant program suitable both for beginners and experts — everything you need supplied. Output can e directed to 
the screen, a microdrive or disk file or to a printer. A £10 discount is available to owners of Super Astrologer on this package 
— send in the colour insert card with your order. 


SUPER ASTROLOGER DE-LUXE .. . £24.95 


“You will not find as good an astrology program as this on any other home computer” . .. Q. WORLD. 


SUPERCHARGE BASIC COMPILER V1.17 . . . £59.95 


“A Classic — 5 Stars!” . . . Sinclair User 
“Supercharge is an Excellent program” . . . QUANTA the independent QL User Group. 
“Superb” . . . POPULAR COMPUTING WEEKLY 
“| have no hesitation in recommending it” . . . QL WORLD 
“A run-away success” . . . YOUR SINCLAIR 
“The claimed speed increase over SuperBASIC of 30 to 1000 times was substantiated” . . . ZX COMPUTING. 


This multitasking compiler is probably the best BASIC compiler ever written . . . 


SUPERFORTH + REVERSI V1.5... £29.95 
REVERSI V1.5... £12.95 


“An Excellent FORTH-83” . . . Reviewer for the Independent QL User Group. 
The Reversi supplied is of stunning strength — guaranteed to beat all its rivals. 


SUPER SPRITE GENERATOR V3.5 . . . £24.95 


“Results achieved are really excellent” ... QL USER 
The majority of commercial games available for the QL use SSG! 


SUPER MONITOR/DISASSEMBLER V3.0. . . £18.95 


The most compact and complete machine code toolbox of its kind! 
“Excellent” ... QL USER 


SUPER BACKGAMMON V3.0. . . £12.95 


“Super Backgammon is brilliant!” ... QL WORLD 


SUPER ARCADIA . . . £12.95 


A compendium of dazzling machine code games! 
* x * 


NOTES 
£5 off SUPERFORTH, £5 off Super Sprite Generator and £2 off Super Monitor plus Disassembler when any of these programs are ordered at the same time 
as SUPERCHARGE. 


You may deduct £1 from the total price if you buy 2 programs, £2 if you buy 3 programs, £3 if you buy 4 programs and so on. 

All deliveries in the UK are post-free. 

Orders from abroad are welcome. Please add £1 (£2.50 for SUPERCHARGE) per program for orders from Europe and £1.50 (£4 for SUPERCHARGE) per 
program for orders from other countries, to cover airmail postage and packaging 

costs. Cheques from abroad should either be drawn on a UK bank or be Eurocheques. 

lf you have an early version of one of our programs, send the microcartridge (not the packaging) to us accompanied by £5 (£6 if abroad, £10 if SUPER 
ASTROLOGER or SUPERCHARGE) for a no-quibble upgrade. 

SUPERCHARGE + ICE is available for £79.95 — or £89.95 with CholCE too! 

Programmer & dealer enquiries are welcome. 

All D.P. software is compatible with disk & RAM expansion systems. 


CUT HERE 


To: DIGITAL PRECISION, 222 THE AVENUE, LONDON E4 9SE 
Please rush me: 


Name: Address: 


reer Ln 


| enclose Cheque/Postal Order/Cash for € ......... sakve cuctetatvnn aueoatete .+.+:, OF debit my ACCESS/BARCLAYCARD account 
(NO: eessecsssssscssnnscnccesnscesessecessnseeeessnseeessccceeesessessnssesensscsesenses EXDIFY Date:  ssesssssseeccsesssecssceneesennsnensnseasesccceesensccesessseesssssseesss ) 


with the amount Of © scccccccccinScascceccestictccennesncccceectenuts 
ULC PPA UIT oes heen vencecesacatoneyctutbeenctvevsescees vueuipareeaeveeen stssssssserereesee (Credit card orders are also accepted on 01-527 5493) 
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QL SCENE @ Latest news on the future of the QL 

QL CHARACTER BUILDING @ Design your own character set 

OPEN CHANNEL @ Our readers express their opinions 

TEST DRIVE © New disc drives and interfaces reviewed 

THE ABACUS ART © How to get more from the Psion spreadsheet 
PUZZLE PAGES e Another free subscription up for grabs 

SOFTWARE APPLICATIONS @ The right approach to business systems 
UNIVERSITY CHALLENGE @ The QL in higher education 

LISP: THE LANGUAGE e Al programming applied to a chess problem 
SPECTRUM SIMULATION @ Persuading the QL to run Spectrum software 
SOFTWARE FILE © We look at six new games for the QL 

THE UNPREDICTABLE MICRO @ Our final look at computerised astrology 
THE PROGS © Ready to run software — just type it in 

MICRODRIVE EXCHANGE @ Place your order today 


INSTANT ACCESS @ Directory of software and hardware suppliers 


NEXT 
MONTH 


Printer Profiles 
Everything you need to know about 
connecting a printer to your QL, 
including which one to buy. 








Games Special 
More reviews than ever plus 
comprehensive games index. 


Utility File 
Sign Designer, CAD Pak and other 
utilities get the review treatment. 


Competition 
Six Eidersoft mice to be won. 


PLUS 


Our regular features, reviews and 
program listings 


Deep in the land of the Hidden Kingdoms, 
guarded by a vicious and evil dragon, 
can be found the Elixir of Life... 


Dragonhold = 4 


DRAGONHOLD is an animated graphic 
adventure game for the Sinclair elm 
And just L@OK at these features - 


- OUr- wile SCROLLING map graphics 
a ént to over 250 screens!) 
ividual computer controlled 
animated characters that you can 
communicate wit 
Extremely detailed hi-res graphics 
Both visual and text puzzles 
Game variations and new eee S 
each time a_new game is generate 
Save game feature - you can save and 
play as many different variations as 
you like! 


A GAME WORTHY OF THE QL 


KARATE 


Available on Roce. cortaic e for 
£19.95 including p. & p. Send cheats 
or P.O.to 


! 11 Bannerdale Road 
R | Sheffield S7 2DJ 


COMPUTER 


SYSTEMS ¢ Tel: 0742 583665 





T. K. COMPUTERWARE 
* Telephone: 0303-81 2052 * 


SOFTWARE: our price £ our price £ 
Eidersoft ICE Eprom ........... PA = VLCHINGD * csccccrasteettsosacsasterenes 17.00 
Artice ........ 12.00 spell (cart) ......... Ee 20.00 
Choice ....... 15:00 ~Qspell’(dISK): «.s.c2scés.:000-00-0 24.00 
Incredible graphics Toolkit” ....4. 10.00. - Casit Trader wicca 64.00 
18 different movements including: ICE (SOLADOVE)  secissececssvenree. 59.00 Project Planner .................. 35.00 
kicks. buachibx. aad’ cometetite Eidersoft Mouse + ICE Enterpreneur Mee 35.00 
re Pp ay ste APUG. sss sisaceaverepevenat ences 87.00 Decision Maker ................. 35.00 
Multi-screen action GMUNG, Sacks cece tecattnwes 9.25 Integrated Accounts ........... 78.00 
Large, fast flicker free sprites Ram disk (Qflash) ............ 17.00 Impact Sales Ledger ........... 46.00 
Multi-player option eae DOGO. sia dane hee flesh deere juatee An 

DIGIOW te sete tacceicvalsw ert. 5) mpact Nominal Ledger ....... 
nt tive SSRIS asad vine 15.00 Impact Stock Control ........ 46.00 
eyboard or joystick control Bitigeticic: anf ees 20.00 Impact (set above) .......... 175.00 
Just £14.95 fully inclusive Super Backgammon ........... 12.00 Home Finance ............0 22.00 
Available at good computer shops hic PAIN os.,.fiagketiteient 22:00 Toulon: NMGO=%....cctrsrscceisans 22.00 

Bane Re Gide feck Fac HARDWARE: our price £ our price £ 
Noith Geonidol, Upititsterteibk Ria seat Dual D/drive & I/face ........ 287.00 Centronics I/face ....... es. 86.25 
DISK AACE aoe cos ctksnssnsneete 86.25 Disk + Print I/face .......... 135.00 

Disk + Print I/face with Disk + Print |/face with 

512K Upgrade ........eesceeee 249.00 256k upgrade ...........0«. 214.00 


| enclose a cheque/PO for £ 


Please deduct my Access/Visa/American Express 
Card No. 


Sra eaTaws Oe 


Exp date 


CREDIT CARDS TEL: 0708 852647/851099 


DE Ree Oe For 





Dual D/drive + I/face + Prt. 

l/face+ 512k upgrade ..... 449.00 
512k Expanderam ............ 119.00 
10 DS/DD'3.5:"DISKS. =.:c.6%. 34.00 


Dual D/drive + |/face + Prt. 

I/face+ 256k upgrade ....... 414.00 
256k Expanderam ........... 89.00 
Tandata QGOM  ccsscsccecsuens- 129.00 


PLEASE PHONE FOR DETAILS OF OTHER QL PRODUCTS IN STOCK 
*ALL PRICES INCLUDE VAT AND UK DELIVERY BY POST OR SECURICOR* 
TELEPHONE ORDER PAYMENT BY: 


Barclaycard, American Express, Diners and Access 
or send Cheque or postal Orders to: 


T.K. Computerware, Stone Street, North Stanford, Ashford, Kent TN25 6DF 
Telex 966676 PMFAB G 
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Hackers found guilty 


Robert Schifreen (22) and 
Steve Gold (80) perpetrators of 
the so-called Prestel Hack, 
were found guilty of forgery and 
fined a total of £3,350. Both 
faced charges under The 
Forgery and Counterfeiting Act 
1981 for gaining unauthorised 
access to Prestel computers. 

sentencing them at the end 
of the 13-day trial at Southwark 
Crown Court, Judge Butler QC 
said: “Forgery is a very serious 
offence. It would usually lead 
me to an immediate sentence 
of imprisonment but | accept 
that the facts of this case are 
of an unusual nature.” 

He qualified his leniency by 
issuing a warning to all 
would-be. hackers, saying: “I 
will not send either of you to 
prison but that does not mean 
that anyone else who behaves 
in the future in the way you 
behaved can hope the courts 
will take the same lenient view.” 

During the trial the court 
heard how Schifreen, a 
freelance computer journalist, 
accidentally obtained 
telephone numbers of Prestel 
development computers not 
intended for public access. He 
then hacked his way past the 
system's security by entering 
an|D consisting of 10 2s anda 
password of 1234. 

The computer then promptly 
provided him with the IDs and 
passwords of the system 
manager, the system engineer, 
and several other BT 
employees with access to 
secure areas of the Prestel 
system. From there it was a 
simple matter to obtain the ID 
and password of any Prestel 
subscriber. 

Schifreen then logged-on to 
Prestel as HRH The Duke of 
Edinburgh and read the 
contents of the Duke’s private 
mailbox, which he said “had not 
been read for 15 months and 
was very dull and 
uninteresting.” 

During the trial, three major 
points of contention emerged. 
Under the 1981 Act, a person 
is guilty of forgery if “he makes 
a false instrument with the 
intent of using it to induce 
somebody to accept it as 
genuine, and by reason of so 
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accepting it, to do or not to do 
some act to his own or any 
other person’s prejudice.” 

In their defence, both men 
claimed that as they had 
informed BT of the gap in its 
security, there was no intention 
of causing prejudice. There 
was considerable discussiuon 
as to whether transmitting 
another person’s password 
down the telephone line to the 
computer constituted making a 
false instrument and whether, 
for the purpose of the Act, a 
computer could be considered 
a person. 

Probably their best chance of 
a successful defence, 


however, was in attempting to 


establish that the BT evidence 
was unreliable. It consisted of a 
schedule of dates and times at 


which the offences were 

allegedly committed, obtained 
by placing a piece of equipment 
known as a Miracle call logger 
the telephone lines of both men. 

The defence claimed that 
information thus obtained was 
inaccurate in several respects. 
Telephone numbers contained 
Superfluous digits, times were 
incorrect and the testimonies of 
experts called to explain the 
workings of the machinery 
conflicted. 

The jury, after deliberating for 
more than five hours, found 
both men guilty on a total of 
nine separate counts — 
Schifreen five, Gold four. After 
the trial, Gold and Schifreen 
indicated their disapproval of 
the verdict and said they intend 
to appeal. 


New QLs announced 


In the wake of the Amstrad 
takeover of the Sinclair 
microcomputer interests, two 
companies have announced 
plans to continue production of 
the QL with an enhanced 
specification. 

Eidersoft, best-known for its 
QL mouse and Ice software, in 
conjunction with disc 
manufacturer CST, intends to 
produce a basic QL machine 
with certain hardware 
improvements. 

Named Thor, the machine 
specification includes half a 
megabyte of RAM, a separate 
IBM PC-style keyboard, 
integral 3.5 in. floppy disc drive 
and ports fora 20MB hard disc 
and a mouse. Two other 
variations are planned, one with 
built-in twin floppies, the other 
sporting 20MB hard disc 
alongside a single 3.5 in. floppy. 

The new machine will also 
feature improved software, the 
128K ROM providing not only 
a revamped version of Qdos 
but J Basic and several 
software packages, including 
the Eidersoft windows 
environment Ice. 

Eidersoft is aiming to release 
the machine in the early 
autumn, probably in 
September, to coincide with 
the PCW show. The predicted 
price is in the £500 — £550 


range for the basic machine, 
rising to £600 for the dual disc 
version and £700 with the hard 
disc. 

Tony Tebby, author of Qdos, 
is setting-up anew company to 
oroduce successor to the QL. 
Named the QLT, his machine is 
to be based on a full MC68000 
microprocessor. Like Thor, it 
will have a minimum of 512K 
RAM, floppy disc, separate 
keyboard and improved 
software, and is expected to 
sell for around £500 when it is 
released next January. The 
machine will also have 
provision for hardware 
expansions like a hard disc, 
ROM cartridges and other 
peripherals. Both the QLT and 
Thor will be completely 
QL-compatible, supporting all 
currently-available software. 

Finance for the QLT will be 
raised by offering shares on a 
one per machine basis to initial 
purchasers of the QLT. 

Tebby initially was involved in 
the Eidersoft/CST project but 
decided to go it alone because 
“the interests of individual QL 
peripheral manufacturers were 
not compatible with producing 
the best possible machine.” 
Ken Browning of Eidersoft 
commented: “Now there will be 
two different machines and 
good luck to both of them. 


Return to seller 


Amstrad are advising owners of 
faulty Sinclair machines still 
under warranty to return them 
to the retailer. A spokesman for 
the company said “it has 
always been Amstrad’s policy 
to provide customer service 
facilities through the dealer 
network. This has proved 
successful in the past and we 
see no reasons to do things 
differently for the Sinclair 
products”. 

On the subject of continuing 
support and back up for the QL 
we were told “efforts will be 
made to ensure that service 
facilities will be made available, 
but that will obviously be 
subject to availability of 
spares”. For the time being the 
company is advising owners of 
expired warranty QLs to 
contact Computafix on 
0276 66266. 


Comment 


The sad story of Sinclair’s 
marketing mismanagement 
is well enough known to 
make further criticism 
appear not only repetitive, 
but, in the light of recent 
events, largely irrelevant. 

Selling off his company’s 
microcomputer business to 
Amstrad amounts for Sir 
Clive to an admission of 
failure. 

The fact that the QL has 
been to any degree 
successful and has 
attracted a loyal and ardent 
following is in large 
measure due to its technical 
excellence. However, rather 
than capitalising on this by 
encouraging a further 
growth of interest in the 
machine, Sinclair has 
managed, through its own 
ineptitude, only in placing 
obstacles in its path. 

Now that Sir Clive has 
decided to cut his losses, 
we must look elsewhere for 
the support that until now 
has been lacking. Whilst 
Alan Sugar of Amstrad has 
made it clear that he does 
not intend to continue 
producing the QL, we can at 
least hope to see improved 
backup and support for the 
machine. 

More importantly, the 
news that independent 
hardware manufacturers 
are working on upgraded 
versions of the QL is the 
most encouraging 
indication yet that the 
machine has a healthy 
future ahead of it. 


el nS) (0) ¢=[e [= from CST 


Now containing the complete QL Toolkit software as well as an easily used Ram-Drive 
device driver, the CST QDisc is the longest established and most widely used floppy disc 
controller for the QL computer. The QDisc interface may be used with virtually any 3.5” 
or 5.25” floppy disc drives including, of course, CST's dual slim-line 720K (1 Megabyte 
unformatted) high performance, 80 track double sided drives. The Toolkit software 
provides a wide range of SuperBASIC commands and functions designed to allow the 
full power of the QL to be realised without resorting to machine code programming, 
giving access to job control, random access |/O, character sets, wild card file handling 
and so on. The Toolkit is included in the QDisc firmware, so it is ready for use as soon as 
the system is switched on, as is the Ram-drive device driver, which allows any unused 
memory to be used as a high speed storage medium, ideal for temporary results, and 
for saving screen images for high speed displays. Naturally the Ram-drive may be used 
be maximum advantage when used on a QL with additional memory such as the RAM- 
plus. 








Expanding the QL's memory from 128K to the maximum 640K, the CST RAM-plus is 
based on the latest 256K DRAMs to give full speed no wait-state operation and is 
housed in an elegant aluminium case which matches the QL and provides an expansion 
port allowing a peripheral interface, such as a QDisc floppy or Winchester controller to 
be plugged in. Adding high speed memory to the QL has several advantages: all QL 
programs run faster, including ones that make heavy use of disc or microdrive as QDos 
uses spare memory for buffering data; increased data space is available for 
SuperBASIC, Psion and other application packages and the QL's multitasking ability is 
greatly enhanced by the ability to load several large programs simultaneously. The 
extra memory can also be used to advantage with the Ram-drive firmware supplied 
with the QDisc. For customers who have already purchased an earlier QDisc controller, 
the Ram-drive software can be supplied on floppy disc at a small charge. 





The flagship of the CST fleet of storage devices for the QL is the 20 Megabyte 
Winchester drive with integral floppy drive. The system is housed in a compact metal 
case with integral power supply and is interfaced to the QL by a small controller card. 
The floppy specification is the same as the standard QDisc; the Winchester is a high 
performance drive unit based on the new SCSI standard, which allows up to eight drives 
to be connected to one QL (available to special order). The Winchester firmware is fully 
compatible with standard microdrive and floppy QDos drivers, and also supports 
heirarchical directories and file date stamping. The directory structure allows files to be 
separated into compartments; for example, programs can be held in one directory 
while data for various projects can be held in other directories. This is essential when a 
disc can hold over 1000 files! Date stamping of files is used to keep a record of the last 
time every file on the Winchester was accessed, modified or backed up. This allows the 
Data Management Utility supplied with the system to archive only those files which 
have been changed since the last backup was performed. This greatly reduces the time 
taken to perform regular backups. 





Cambridge Systems Technology 
24 Green Street, Stevenage, Herts SG1 3DS 
Telephone: Stevenage (0438) 352150 





Please supply the following items: Name 
QDisc Interface including ram drive: £79.95 Address 
Dual 720K 3.5" Floppy Disc Drives: £219.95 
RAM-plus 512K Memory Expansion: £139.95 
QDisc + Dual Floppy Drive: £275.00 
QDisc + RAM-plus + Dual Floppy Drive: £405.00 
20Mb Winchester with floppy: £1150.00 
20Mb Winchester, floppy By ned £1280,00 | Post Code ____-_________ Telephone 
Q488 IEEE GPIB interface: £224.25 | | enclose a cheque/PO for £ 
QEP-III Eprom Programmer: £115.00 
Q+4 Expansion System: £230.00 | Please deduct my Access/Mastercard/Eurocard/Diners Club a/c 


Information on: 


Utility disc including ram drive (3.5"): | £10.00 Cord | | | | | | | | | | | | | | | | | 
Utility disc including ram drive (5.25"): £10.00 ard No. 


Signature 


Prices are inclusive of VAT, postage and packaging in the UK only 
CST reserve the right to alter prices and specifications without prior notice 
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offer the best alternative 





to the microdrive 


specially designed to fit neatly into the case of the Sinclair QL, the MCS-Disc Interface Board 
and companion disc drives are colour-matched to compliment your QL computer. 
The MCS (Micro Control Systems) disc interface with the offers have of RAM. For 256k of RAM please add 
599 inc Vat and zero k for 512k of RAM please add £189 inc Vat. 
The 256k and 512k versions.also include a centronics printer interface with lead and toolkit on rom. 
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Prices correct 
of time of 
going to press. 
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Visit our Showroom “7 “ 
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Open Monday — Friday Vi f 7] 
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9,30 — 5.30 HIN 
Saturday 9.30 — 2.00 





All drives are compatible 
and ready to plug in and use with all currently Carriage ee ee 
available QL Disc Interfaces. When bought Please add $12.00 ™ Post to: VIGLEN COMPUTER SUPPLIES 

with the MCS-Disc Interface, they are ready to carriage for disc drive, f Unit 7, Trumpers Way, Hanwell W7 2QA 





Plug in and use. £8 for printers and ™ Credit card holders may order by telephone on 01-843 9903 
monitors, £3 for printer h 
H stands, Please send me pe 
Other peripherals forthe QL ; | enclose Cheque/P.O. for © including carriage. 
MONITORS phillisns Monochrome Green Unit 7, Make cheques payable to Viglen Computer Supplies. 
Model BM7502 sinsinnsinsnninnminin £85 Trumpers Way, ‘ 
Mode BMSE2 a cli £95| Hanwell W7 20a. * Name: 
ill | it - Ol- 
lig oils £199| Tel: 01-843 9903 sass 
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enough, several can be 
defined and printed as a 
group. You will not need to 
be told that the QL does not 
have UDGs built into 
SuperBasic but with the 
application of some 
machine code the 
shortcoming can be 
remedied. The machine 
code routine in listing one 


modified to suit the needs of 
the user. In serious 
applications it is possible to 
produce characters such as 
special scientific symbols, or 
for the games player 
characters can be defined to 
resemble missiles, 
spaceships and other 
warlike paraphenalia. . 

If one character is not big 


ost computers, 
including the 
QL’s little 
brother the 
Spectrum, have 
facilities for user-defined 
graphics. For the uninitiated, 
that means that the 
appearance of some of the 
characters the computer 
prints on the screen can be 


James Lucy shows 
how to modify the 
OL Character set to 





produce anything 
from space 
invaders to fancy 





fonts. 


Listing 1 


“” 
* ion 3 
: UDG program version * Persuade channel to use our font 
* First find the font ( Not strictly necessary; could use method in UDG ) * 
_ LEA CHAN, AO 
MOVE.L £$1F605428,D1 Characteristic start of ROM font MOVE.L (A0),A0 Retrieve chan id 
SUBA.L A0,A0 Zero AO SUBA.L = A2,A2 Zero A2 
LOOK ADDA.L £2,A0 Start looking in word size steps LEA RAM_FONT, Al Point to Ram font 
CMP.L (AO), D1 Is it the ROM Font? MOVE.L (A1),Al 
BNE.S LOOK No, so look at next word MOVEQ Z-1,D3 indefinite timeout 
LEA ROM_FONT, Al Yes, so store address of font in ROM_FONT MOVEQ £$25,D0 SD. FOUNT Trap 
MOVE.L A0O,(A1) TRAP £3 
m TST.L DO Errors? 
* Link in the keyword : BNE.S = ERR_EXIT Yes, so exit 
a 
MOVE.W  $110,A2 ‘® Transfer parameters to new font 
. ” 
= ae OK1 LEA RAM FONT,A1 
MOVEQ 10, D0 MOVE.L (A1),Al Get address of font 
et ’ LEA PARAMS, A5 Point to our UDG parameters 
i MOVE.W (A5),D6 Load first parameter(character code) 
PROC DEF DC.W 1 SUB.B (Al), D6 Subtract lowest valid character 
i DC.W UDG-* NULU £9,D6 Multiply by 9 
DC.B 3, 'UDG' ADDQ £2,D6 and add 2 to skip past first two bytes in font 
DC.W 0,0,0 ADDQ £2,A5 Look at next parameter 
_ MOVEQ 28,D5 Set up for 9* loop 
* Now describe the routine itself NEW_CHAR MOVE.B 1(A5),0(A1,D6) Move LSB-Of param to correct place in RAM font 
* 
UDG ply ig aa Get eomeparamerere LEA ROM FONT AL Point to Rom font 
MOVE.L_ (Al1),Al Address of font to Al 
a reds alge ag ane agi a chan no.) COPY_FONT MOVE.W (A1)+, (A0)+ Transfer the font to the heap area 
. , DBF D1,COPY FONT 
MOVE.W O(A6,Al.L),D6 Yes, so store Sbasic channel number 7 - 
ADDA.L  £2,Al and skip past it on RI stack 
SUBQ.L 2£1,D3 Prepare D3 for the subroutine (10 pars only) ADDQ 21,D6 Next byte in font 
BSR COPY_PARS and copy the parameters to our store ADDQ 22,A5 Next parameter 
BSR CHAN_ID Calculate QDOS chan id from SBasic chan num DBF D5,NEW_CHAR 
TST.L DO Any errors? * 
BNE ERR_EXIT Yes, so exit MOVEQ 20,D0 
BRA CHK_FONT No, so skip the section below RTS 
* Py 
DEFAULT CNPI.W £10,D3 If not 11, have we got 107 BP ERR MOVEQ  £-15,D0 
BNE BP_ERR No, so write Bad Parameter error ERR_EXIT RTS 
BSR COPY_PARS Copy params to store * 
MOVE.W £1,D6 Set default channel 1 * Expects sbasic chan in D6, returns 
BSR CHAN_ID and find its QDOS id ® chan id in AO, error in DO 
TST.L DO Errors? * 
BNE ERR_EXIT Yes, so exit CHAN_ID MOVE.L $30(A6),A0 Point to Basic channel table 
* . 
* Now see if we have already redefined the font MULU £$28,D6 Multiply chan num by length of 
= each channel entry 
CHK FONT MOVE.L A0,DO Put id in data register ADDA.L D6,A0 and add it to base of channel table 
a AND.L ESFFFF, DO Look at word giving position in chan table CMPA.L $34(A6),A0 Now see if we are off the top of the table 
LSL.L 22,D0 Multiply by 4 because entries are long words BGE.S NOTF If so, return not found error 
MOVE.L O(A6,A0.L),D0 Set condition codes with id 
‘ hann 1 
MOVE.L $28078,Al Point to base of channel table aD, ab 40 eae ah vs Saa2= ctosed 
NOVEL — OCAL, DO), Al MOVEC 20, D0 No errors 
LEA $2A(A1),Al Font address is at $2A from base of chan def block RTS Q ; 
CMPI.L 2£$BFFF,(A1) Is font within RAM? S 
BLE.S NOT_RAM No, so need to copy ROM font nOEE meal To65D0 Channel nee Open Serr 
LEA Oy Ch Yes, so store its address in RAM FONT * 
MOVE.L (Al), (A2) 
BRA.S OK1 And skip past ROM font copy * Expects number of pars in d3, Al 


# 
* Action if font 


is in ROM: 


* pointing to top of RI stack 
~ 


* COPY_PARS LEA PARAMS, A2 Point to parameter storage 
SUBQ 21,D3 Prepare for DBF loop 
eal pei i L Me Can Store chan.id: in. CHAN LOOP1 MOVE.H O(A6,Al.L),(A2)+ Copy contents of RI stack to store 
MOVE. L 1876 D1 and use QDOS Trap to ADDQ.L £2,Al and look at the next item on RI 
e , 
MOVEQ 10,D2 reserve 876 bytes te D3,LOOP1 and continue until all pars copied 
MOVEQ Z$18, D0 of heap space * 
aa se ms leah CHAN DS.L 1 Space for QDOS channel id 
; igre ee ROM FONT DS.L 1 Address of font in ROM 
BNE ERR_EXIT Yes, like out of memory, so exit RAM FONT DS.L 1 Addveas ot #ontcinuhan 
on He HO, #0' point to RANKONE PARAMS DS.W 10 Space for 10 UDG parameters 
MOVE.L AO, (Al) After Trap, AO contains base of heap area allocated 4, 
* Copy the font END 
MOVE.L £437,D1 Set up Dl for a loop 
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adds a suitable command to 

SuperBasic, UDG, the syntax 
of which will be explained 

later. For those without an 

assembler, a Basic loader is 
given in listing two. 

The third program Font 
Designer uses the UDG 
extension to provide a 
convenient environment in 
which to design your own 
graphics characters. In this 
article we will look at how 
the QL displays characters 
on the screen and how we 
may make changes to suit 
our needs. To help make 
things clear, this is an 
interactive article. Various 


lines of SuperBasic will be 
given in the text which, if 
typed-in in sequence, will 
form the essential elements 
of a program implementing 
UDGs from SuperBasic. 
Sinclair prefers the 
spelling fount to font but 
however spelt its literal 
meaning is a set of type. In 
the computer context, a font 
is a set of numbers in 
memory which define the 
way in which the computer 
will represent characters on 
the screen. The legibility of 
screen characters varies 
considerably between 
computers and is a 


REMark Basic loader for UDG SuperBasic extension 


REMark James Lucy 


REMark This program adds the extension UDG to SuperBasic 
REMark and should be run before using the Font Editor 


REMark If the Remark in line 240 is removed, it will generate 


REMark a binary file ‘udg' in a form useable by Font Editor 


REMark assuming a JS ROM. 


If you do not have a JS ROM, the ‘udg' 

REMark file may be used by typing '‘a=RESPR(512) 

:LBYTES mdvl_udg,a: 

REMark CALL a' directly after a reset. 

Font Editor may then be run. 

ad=RESPR(360) : checksum=0 

RESTORE 250 

FOR a=0 TO 359:READ byte:POKE ad+a, 
byte:checksum=checksum+byte 

IF checksum <? 27884 : PRINT ‘Wrong data!' : STOP 

CALL ad : PRINTZ0,"UDG loaded" 

REMark SBYTES mdvl_udg, ad, 360 

DATA 34,60, 31,96, 84,40,145, 200, 209, 252 

DATA 0,0,0,2,178,144,102, 246,67, 250 

DATA 1,56,34,136,52,120,1,16,67,250 

DATA 0 8,146,112,0,78,117,0,1 

DATA 0 ,»85,68,71,0,0,0,0 

DATA 0 » 120,1, 18, 78, 146,12, 67 

DATA 0 02,30,60,54,152,0,211,252 

DATA 0 25835.131,97,0,0,232 

DATA 9 »196,74,128,102,0,0,188 

DATA 9 ,»28,12,67,0,10,102,0 

DATA 0 97,0,0,206,60,60,0,1 

DATA 9 ,» 166,74,128,102,0,0,158 

DATA 32,8,192,188,0,0,255, 255,229,136 

DATA 34,121,0,2,128,120,34,113,0,0 

DATA 67,233,0,42,12,145,0,0,191,255 

DATA 111,8,69,250,0,182,36,145,96,72 

DATA 67,250,0, 166, 34,136, 34,60,0,0 

DATA 3,108,116,0,112,24,78,65,74,128 

DATA 102,0,0,94,67,250,0,150, 34,136 

DATA 34,60,0,0,1,181,67,250,0,134 

DATA 34,81,48, 217, 81, 201, 255, 252,65, 250 

DATA 0,118,32,80,149, 202,67,250,0,118 

DATA 34,81,118,255,112,37,78,67,74,128 

DATA 102,44,67,250,0, 102, 34,81, 75,250 

DATA 0,100,60, 21,156,17,204,252,0,9 

DATA 84,70,84,77,122,8,19,173,0,1 

DATA 96,0,82,70,84,77,81,205, 255,244 

DATA 112,0, 78,117,112, 241, 78,117,32,110 

DATA 0,48, 204, 252,0,40, 209,198,177, 238 

DATA 0,52,108,12,32,54,136,0,109,6 

DATA 32,64,112,0,78,117,112,250,78,117 

DATA 69,250,0,28,83,67,52,246,152,0 

DATA 84,137, 81,203,255, 248,78,117,0,0 

DATA 


8,7 
912,3 
,0,52 
,11,1 
0,0, 
7,0,0 
6,0,0 
,174, 
7,0,0 


DATA 





Sinclair/QL World June 1986 


Listing 2. 
DATA The Basic Loader 


significant factor in the 
user-friendliness of the 
machine; very distorted 
typefaces are tiring and 
continually remind users 
that they are using a 
second-rate computer. 

The appearance of the 
characters will depend on 
the resolution of the screen, 
the number of characters 
which are to fit ona line, and 
the typeface style in use. The 
maximum horizontal 
resolution of the QL is 512 
pixels — pixel=picture 
element, the smallest area of 
the screen the QL can 
control — which with 85 


FIG 1. 
G4 3296 8. A 


characters per line implies 
that each character can be 
six pixels wide. 

In practice, the right-hand 
one of the six pixels is left 
blank to provide spaces 
between the letters. A 
similar calculation with 25 
lines and 256 pixels vertical 
resolution gives 10 pixels 
height to each character. The 
top row of each 10-high 
block is implicitly blank to 
allow space between lines. 
That causes problems if you 
are trying to make large 
shapes from several UDGs — 
use the CURSOR command 
to abut them. The reason for 
the 5x9 grid used on the 





Font Designer and in figure 
one should now be clear. 

The QL uses a sans-serif 
typeface which is not so 
clear as that on some other 
machines, notably the 
Macintosh, but is a 
considerable advance on the 
Spectrum, which lacked true 
descenders. Since there are 
several different character 
sizes available — SuperBasic 
CSIZE command — it might 
be thought that different 
fonts would have been 
employed for the various 
sizes, allowing attractive and 
legible typefaces for the 
larger characters. In fact, 
presumably for reasons of 
space and to simplify the 
screen driver, the 
compromises made for the 
smallest characters are 
magnified for the larger, 
which is why the large sizes 
look rather strange. 

We will now go on a font 
hunt. Since the QL needs to 
display characters as soon as 
it is switched on, the 
information for the font 
must be contained in ROM. 
The precise location varies 
between ROM versions but 
immediately after switch-on 
this expression will print the 
address of the start of the 
first font. This is the first 
thing to type in if you feel so 
inclined: 
chan num=1 
rom font=PEEK_L 
(PEEK_L(PEEK_L( 
163960)=chan_num*4) 
=42) PRINT rom_font 

On the JS ROM that yields 
44442 and the alternate font 
45318, the latter obtained by 
substituting 46 for 42 in the 
foregoing expression. Both 
these addresses are, or 
course, firmly in ROM. 

If anyone is wondering 
where three nested PEEK_Ls 
come from, here goes. 
163960 is the address of the 
base of the channel table. 
The channel table consists of 


10 


Listing 3. 


100 
110 
115 
116 
120 
130 
140 
150 


160 
170 


180 
190 
200 
210 
220 
230 


240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 


350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 


460 
470 


480 


490 
500 
510 


520 
530 
540 


550 


REMark Font Designer 

REMark James Lucy Tel. 0621-891715 

REMark Call the following procedure periodically 
REMark when typing in the program: 

DEFine PROCedure update 
DELETE mdvl_font_bas : 
END DEFine 

REMark The following instruction loads the 


SAVE. mdvl_font_bas 


730 
740 
750 
760 
770 
780 
790 


800 


END FOR row 
END DEFine 
DEFine PROCedure show font 
WINDOWE4, 198, 63,272,138 : 
BORDERZ4,1,0 : CSIZE£4,0,0 
FOR a=32 TO 127 : PRINT34, 
WINDOW24,118,32,307,99 ; 
: BORDERZ4,1,0 

GSIZE 2;0 3 STRIP 7 % 


PAPERZ4 ,4 


'CHR$(a)! 
PAPERE4, 7 
OVER O : 


INK 0 : AT 0,1 


SuperBasic extension UDG 810 PRINT “Character -"3cc « CSIZE 3,1 ¢ STREP G 
REMark It may be included in the program on JS ROMs, : OVER -1 : INK 7 
REMark but should be typed in as a direct 820 END DEFine 
command after a reset 830 DEFine PROCedure set_up 
REMark on other versions 840 MODE 4 : OVER O : WINDOW 512,256,0,0 : 
REMark a=respr(512) : lbytes mdvl_udg,a : call a PAPER 7,4,2 
DIM g(5,8) : set_up + info 850 ‘CES “*s-STRIP’ 7°’: INK 0 “4 UNDER” lr "CSEZE 3,1 
REPeat outer loop 860 CURSOR 130,225 : PRINT' FONT DESIGNER a 
x=0 : y=0 .. CSIZE 0,0 : UNDER 0 
which char : draw_grid : show_old_ char 870 BLOCK 448,200,32,16,7 : BLOCK 5,200,480,21,0 
: show _new_char : show_font 880 BLOCK 448,5,37,216,0 
REPeat LOOP 890 WINDOW 186,180,49,30 : PAPER 4:BORDER 1,0:CLS 
CURSOR 23+20*x,24+15*y  ; PRINT '*"* 900 OPEN23,scr_198x60a272x30 
a=KEYROW(1) : IF NOT a : GO TO 260 910 PAPERE3,2 : BORDER23,1,0 : INK£3,7 : CLS&3 
CURSOR 23+20%*x,24+15%*y : PRINT '*" 920 OPENZ4,scr_118x32a307x99 
SELect ON a 930 PAPERZ4,7 : BORDERZ4,1,0 : INK24,0 : CLS&4 — 
=1 : INPUT dummy$ : EXIT LOOP 940 OPENE5, scr_198x63a272x138 
=2 : x=x-l : IF x< 0: x=0 950 PAPERE5,4 : BORDER£5,1,0 : INK£5,0 : CLS&5 
=a & y=y-1 : IF y< O 3: y=0 960 PRINTE3, \' CSR KEYS - MOVE MARKER ‘\' 
=8 : EXIT outer loop <SPACE? - TOGGLE PIXEL ' 
=16 : x=xtl ;: 183 x> 4s: x=4 970 PRINTZ3, ' <CR> - ANOTHER CHARACTER'\' 
=64 : BLOCK 20,15, 20+20*x,25+15*y,7 ESC? = - ~—s EXIT PROGRAM' 
: g(x,y) = g(x,y) XOR 1 980 END DEFine 
: totalup y : newchar : show new char 990 DEFine PROCedure info 
Le err tr hea yk lOO 1000 PRINT\\' FONT DESIGNER provides an ' 
END SELect 1010 PRINT ‘interactive environment to : 
FOR a = 1T0 25: NEXT a 1020 PRINT ‘generate the parameters : 
END REPeat LOOP 1030 PRINT ‘required for the SuperBasic : 
showatout ee PRINT Regi tae leat. As a is and 
D PRINT "redefined, the new character ' 
5 led Seve ae2°P 1060 PRINT ‘will be displayed in several ' 
DEFine PROCedure totalup (row) 1070 PRINT ‘different CSIZEs. When the : 
mpx=64 : rowtot=0 1080 PRINT ‘character has been redefined ' 
FOR col = 0 TO 4: rowtot = rowtot 1090 PRINT ‘simply make a note of the 
+ g(col,row)*mpx : mpx=mpx/2 ie rap i fags agg for use in UDG 
BESTOW Ia ToRcot 1115 PRINT ' eee any key to continue ':PAUSE 
CURSOR 140,28+15*row : OVER O : CSIZE 1120 UDG £4,32,0,0,0,0,0,0,0,0,0 
25083, INK; OverSTRIP 7:PRENT' : 1130 END DEFine é 
CURSOR 140,28+15*row : PRINT rowtot : 1140 DEFine PROCedure*wHton vena 
OVER ~1:CSIZE 3,.L¢ENK 7tSIRIP SS 1150 OVER 0: INK 0: STRIP 7 
ciiite Ph enee newchar ELGO CSHB DS 3 0CCo athe eee 
UDG 24,cc,g(5,0),g8(5,1),8(5,2),8(5,3),8(5,4), se coe a Leeeaes aoe ys i an 
8(5,5),8(5,6),8(5,7),8(5,8) 1190 PRINT " (O to exit program) | ss 
ee eee 1200 AT 7,10 : CSIZE 3,1 : INPUT cc$ : IF 
DEFine PROCedure show_new_char ec$='0' : tidy up 
Syn Fe Gee aaa da 1210 IF ec$='' THEN cc$='65' : GO TO 1230 
oe 1220 FOR a=1 TO LEN(cc$) 
CSIZEZ4, 2,0 J. DE. 's CSIZEZ4,3,1 H 1221 b=CODE(cc$(a)) 
ag PA, 1222 IF b < 48 OR b> 57 
END DEFine 1223. BEEP 1000, 255. 3 CLS ‘3° ‘CSIZE°0;0 ¥ GO-TO 1200 
DEFine PROCedure pr : PRINT24,CHR$(cc)&' 1224 END IF 
"; : END DEFine 1225 END FOR a 
DEFine PROCedure draw_grid 1227 IF cc$ < 32 OR cc$ > 127 
FOR a = 0 TO 5 : BLOCK 1,135, 20+20%a, 25,7 1228 BEEP 1000,255 :CLS*3- "SIZE 10,0 $' GO TO21200 
FOR a=0 TO 9 : BLOCK 100,1,20,25+15*a,7 1229 END IF 
INK 7 : OVER -1 : CSIZE 2,1 1230 cc=cc$ : CLS : INK 7 : STRIP 4 
END DEFine 1240 END DEFine 
DEFine PROCedure show_old_char 1250 DEFine PROCedure tidy up 
char_addr = font_addr(4)+2+(cc-31)*9 1260 FOR a=3 TO 5 : CLOSESa 
FOR row = 0 TO 8 1270 WINDOW 448, 200,32,16 : OVER 0 : PAPER 4 : INK 0 
vall = PEEK(char_addr+row) : dvx=64 : CSIZE 0,0: §° CES 
FOR col = 0 TO 4 1280 WINDOW2Z0,448,40,32,216 : PAPERZ0, O : INK£0, 
g(col,row) = vall DIV dvx 7 : CLS20 : STOP 
IF g(col,row) : BLOCK 20,15, 20+20%*col, 25+15*row,7 1290 END DEFine 
vall = vall MOD dvx : dvx = dvx/2 1300 DEFine FuNction font addr(chan_num) 
END FOR col 1310 RETurn PEEK_L(PEEK_L(PEEK_L(163960)+chan_num*4)+42) 
totalup row 1320 END DEFine ae ¥ 
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a series of longword 
pointers to the channel 
definition blocks for each 
channel. The second entry in 
the channel table is for 
SuperBasic channel 1 — on 
start-up — so the expression 
PEEK_L(PEEK_L(163960) 
=1*4) returns the address 
of its channel definition 
block. At offsets of 42 and 46 
are the addresses of the fonts 
in use for that channel. The 
alternative font mentioned is 
the one used to print all the 
foreign letters and odd 
symbols which appear when 
you press strange 
combinations of keys. 

The format of the fonts is 
shown in figures two and 
three. The first byte contains 
the code of the lowest valid 
character in the font, the 
second byte contains the 
number of valid characters 
minus one, and then follow 
blocks of nine bytes, each 
block describing one 
character and each byte 
describing one row of one 
character, 

PEEK(rom_font) 
should give 31, the code of 
the lowest valid character... 
PEEK(rom_font+ 1) 
should return 96, one fewer 
than the number of valid 
characters. When the QL has 
to write a character to 
screen, it looks to see if the 
character is valid in the first 
font; if not, it tries the second 
font and if it still cannot be 


NINE BYTES 
DATA FOR 


Ist VALID CHAR 





cannot be modified. The 
solution is to copy it to RAM, 
where it can be altered as 
much as we like, and then to 
make the relevant channel 
use Our new font. Qdos, 
the QL operating system, 
provides a routine to 
persuade any console or 
screen channel to use a font 
at a specified address — Tra 
3, DO=$25, AO=chan id, Al, 
A2 — font addresses — or if 
we know the address of the 


the columns which have ink 
colour squares. That will 
produce nine numbers 
which should have values 
between 0 and 124 and be 
divisible by 4. They are the 
bytes which make up the 
character. 

The one remaining 
problem is to calculate 
where to put the bytes. 
These lines of SuperBasic 
will reserve some space for 
a RAM font and copy the 


HEADER 


| ak apitoas er sme 


1BYTE 
LOWEST 
VALID CHAR 


channel definition block in 
question we can poke the 
font address locations direct. 
This rather unofficial 
technique is used below, 
once we have created a RAM 
font. 

We are now in a position 
to set up our own font, 
modifying any of the 
contents to produce special 
characters, or modifying all 
of them to provide a new 
typeface. As described, the 
information to create each 
character consists of a block 


1BYTE 
NUMBER OF 
CHRS - 1 





ROM font into it, assuming 
you have entered the other 
lines above: 
ram_font=RESPR(9* 
PEEK(rom_font+ 1)+2) 
FOR a=0 TO 874:POKE 
(ram_+a),PEEK 
(rom_font-+a) 
Now wemake channel 1 use 
our new font: 
POKE_L(PEEK_ 
L(163960)+1*4)+42), 
ram_font 

We are poking the address 
we peeked to find where 
the ROM font was. 


CHARACTER DATA 


_ 


NINE BYTES 
DATA FOR 


2nd VALID CHAR 





10 DATA 16, 40, 16, 124, 
16, 40, 40, 40, 68 

20 RESTORE 10 

30 FOR a=0 TO 8:READ 

byte:POKE char_bytes_ 

addr=a, byte RUN 

This data will produce a 
passable imitation of a ~ 
human figure when used in 
CSIZE 3,1. To see it just type 
PRINT“A”. 

As you will by now 
appreciate, defining your 
own characters from 
SuperBasic is possible but 
requires perserverance, 
particularly if you intend -to 
re-define characters in 
several different channels. 
The machine code extension 
to SuperBasic, UDG, works 
in a very similar way to the 
method described in 
SuperBasic but very much 
simpler and quicker. Once it 
is loaded, it remains part of 
SuperBasic until the 
machine is switched off. The 
syntax of UDG is as follows: 
UDG chan_num, 
character, par1, par2,..., 
par 9. 

- Thus if you wish to 
re-define character 65 in 
channel 2 to our ‘stick-man’ 
shape you would simply 


type: 
UDG 2, 65, 16, 40, 16, 124, 
16, 40, 40, 40, 68 

The channel number is 
optional and, ifnot specified, 
defaults to channel 1. The 
character number is not 
error-checked and should 





found it prints, in the case of 
the JS ROM, the lowest valid 
character in the first font. 
This is the chequerboard 
pattern and the nine bytes 
which make it up can be 
seen by entering: 

FOR a=1 to 9: PRINT 
!PEEK(rom_font+1+a)! 
This should print out 
84,40,84,40, .. . etc. 

Now we know what the 
font is and where to find it, 
but there is still a problem. 
The font is in ROM and so 


of nine bytes. Reference to 
the grid pattern in figure one 
will show how suitable 
values for these bytes are 
produced. 

Draw a grid five squares 
wide by nine squares high. 
Write the numbers 4, 8, 16, 
32, 64 above the columns, 
working from right to left. 
Shade-in any squares you 
require to be ink colour, 
then calculate the value for 
each of the nine rows by 
adding the numbers above 


Suppose we wish to 
re-define the upper case A, 
character code 65. 

LET char_num=65 

We can now calculate the 
address of the start of the 
bytes for the character ‘A’: 
char_bytes_addr= 
ram_font+ 2+9* 
(char_num-PEEK( 
ram_font) ) 

All that remains is to poke 
the values calculated from 
our grid to the location; you 
need line numbers for this: 


be in the range 32-127. 

The Font Designer is an 
easy-to-use SuperBasic 
program to generate the 
parameters for UDG, 
making use of the UDG 
extension. Characters are 
re-defined on-screen and 
are displayed simultaneously 
in several different CSIZEs. 
The complete font is also 
displayed to facilitate 
consistency of style if 
re-defining the whole 
character set. The method of 
operation is explained 
clearly on-screen. 


BRYN COTTAGE, oun CARMARTI EN, DYFED SA32 7D TEL: 0267-281246 


PRICE LIST 
QL COMPUTER 2.3 SOFTWARE — PLEASE CALL FOR LATEST PRICE 
ALL PRODUCTS FROM STOCK FOR NEXT DAY DELIVERY 


PRINTER PRICES INCLUDE MIRACLE SYSTEMS INTERFACE 
SEIKOSHA SP1000A . ‘5 
Sinclair printer with serial cable ( (available mid d May) 

TAXAN KP810 .. Lae, Se 


MONITORS (Cables Included) 

Microvitec Cub 1451/DQ3 Colour .. 

Microvitec Cub 1451/DOT3 with Swivel Stand .. 

TAXAN KP910 .. ertNighha ge oakaeaxecnsanskaxes hae Swivel Stand for Microvitec .. itasceadenbiaceiveN boas 
GUEMDATADIAISVWHEEL foc lb ccs leccceessssnncrsct dM osscsonseecseeeKtteecbonrtBhocbeeh Phillips V7001 18MHz Green (RECOMMENDED FOR THE QL) Leven eowtaek 

Miracle Systems Parallel interface oe: 3250 WATT MAINS FILTER .. Se RS a, 

2000 Sheets Fanfold Paper (supplied with printer) * Provides four protected mains socket with plug 

1000 Sheets 80grm Micro Perf. (supplied with printer) ...........cseseserereeens . : * Avoids crashes and damage to the QL’s components 

ACCESSORIES * 30db suppression 1MHz to 30MHz 

4 Microdrive cartridges .......... £8.00 TRSRRREDIIN GOK): 53: cvtiasarcests J ee * 130 joules spike suppression 

10 Cartridges with Transform Box £23.00 oe MIRACLE SYSTEMS MODAPTOR 

10 DS/DD 5.25” Disks ............... £23,00 10 DS/DD 3.5” Disks ................. l ae * Link your QL to any modem with an RS232C socket 

RIBBONS 8 * Prestel and Bulletin software included 

Brother M1009 £5.50 MT80 or Shinwa ....... . MICROSTICK JOYSTICK WITH ADAPTOR 0.0.0... cccccesccscsesseressnestsssseereeseeesess 
Quen Data ... Eaters. £6.00 SP1000A (Sinclair) . ; OL JOYSTICK ADAPTOR 

TAME ich ale Like £808 Epson RX/FX/MX ST : 


Ssssss 


CLEANING KIT IN | CARRYING CASE 

INCLUDING * Disk head cleaner for 20 cleans 
*  Antistatic monitor spray 
* Keyboard cleaning solution 


SOFTWARE 3. 

LANGUAGES BUSINESS LEISURE 

Metacomco Assembler ............:..... £29.00 TR Systems Payroll ......ccccceeceees £63. oe Talent Zkul j Microdeal HOpper ............00++. re 

Metacomco BOPL .........ccscesseeseee. £49.00 Decision Maker Talent West WANGGTOT SD ...ccssssosesssecsnnsesrrss eles 

Metacomco Lisp ... aviourvndl ert, See PIOIGOT PIAGET: .....nosesadeorsdnseicesnsesvens ( : THIGHE GAD iscsvasscavscccceasvieassanesens : Classic Adventures 

Metacomco Pascal séisssatessationa) MOO BRR CRTOROE siccitiReeenartactians K 7 QL Paint : Microdeal Flight Simulator 

Metacomco ‘C’ ...... .... £79.00 QL Home Finance (Buzz) ................. , QL Sprite Generator x QL Bridge Player Il 

Digital Basic Compiler ....... £49.00 Typing Tutor te | a QL SuperbackgaMMON ..........cceees / BJ Returns 

Digital Forth + ReVeFSi cscccsowus £24.00  Eldersoft ArChIVEr ..c.sssseeseeeesneoe £17. F) PSION CHESS arnsrsecpeonscsnnssnese E17. Match Point <..cccssesnenseneene 

QMON Monitor/Debugger ............... £18.00 Eidersoft QSpell (Cart) ae " C Hyperdrive seats aaslesspaeioohunuNles oneani ‘ QDraw suvecbinoasas 

Talent Cartridge Doctor vssneae £13.00 Eidersoft OSpell (Disk) .... Digital REVErsi .........sscssurssveesseeeon QL Super Arcadia .........c.cc....c.. 

QL Switch Multitask .............0..... £15.00 | Steve Davis Snooker SPIOUIK ccarayeetasshtaatatohacenscesdtenssveyehsstW 

Pro Fortran-77 vee £89.00 . Talent GOSIMOS | 02.026, iicececctetins : Digital Astrologer ...............::c:c000 
QIPGRVOMS Li aeahahbdrtenseks Master Blaster ..........c.ccsecccsseeseeeeees 

Tony Tebby’s New Supertoolkit Il on EPROM ..................00 cdc Bhat. : . QE FICHONAI Al Ldcsctvnl eotena ‘ a] Ea 372) 77 (1 || RES MiDpe An ¢> Mer <0 

Talent Assembler with Monitor Disassembler ...........cssccesssseseseseeenesennsenesseresunenen ‘ fe CHEM... 0.00850: snesnoteaitueaetabacteneran “8. QL Meteor Storm 

Eiderepitilce: FOU cre We Gly OER... csscie shah bea ptites PROMI Red cto ee TO | : QLPAWN! 5. .o7ca 8p k.niaraer (3 - BUiSD i... siistesmaveete 

Eidersoft Ice Artice eeietatre. steep Davee Sra evcpveccrasehy zeteys ‘ a Knight Flight . ’ Scrabble 

Eidersoft Ice Choice 0 ee ee ee cae ‘ _ Zapper With Eagle ..........2......000 ' SD Slate seve cob it atecmer. tea. 

Eidersoft Ice EPROM on its own. ............5.. ee ee ee, i _ NGIMGSIS cccrs svcrenssgcencvse crurteaunmurs ; Ol: JSBBOR. <-ssocaissuacrvelnessCxcasecrassness1 

Eidersoft Ice EPROM with Software Compendium | 





For your QL communications needs — covers all the major inter- 
national FSK modem modes permitted in UK 


300/300 baud CCITT V21 Answer & Originate 
1200/75 baud CCITT V23 main channel 
75/1200 baud CCITT V23 back channel 
1200/1200 baud half duplex packet system 


Auto-dial and Auto-answer 


Centronics interface with 6KB buffer — for serial to centronics 
conversion or for printing incoming modem data. 


Comes complete with communications software for the QL —Prestel 
emulation, 40/80 column terminal emulation, text file transfer. N.B. 
software works with expanded QLs. 


announce 


Not BT Approved 
BT approval applied for 


Onboard microcomputer ensures correct data exchange with QL 
and provides split baud rates for V23 modem modes. 


The Astracom 1000 is controlled by software commands from 
keyboard or the communications software provided. Automatically 
reports mode and status and has inbuilt help menu. 


Auto-scan feature puts modem in correct mode to respond to 
incoming carrier. 


The Astracom 1000 has its own power supply and can be used with 
any computer that has a serial port, and so will work with a successor 
to your QL. Astracom intend to provide communications software 
for a wide range of computers. 


The Astracom 1000 is 7 inches wide by 8 inches deep and 1.5 inches high. It comes complete with software, manual and serial cable, all for 


For free data sheet or further information phone 0792 473697 anytime 





SUPER Q-BOARD BY SANDY 


This is the complete upgrade for the QL completely contained in the Sinclair specified expansion unit. 
Itlooks the same as a normal interface except that the disk socket is moved towards the front of the Sinclair moulding making room for a parallel printer port to be inserted. 
Inside together with the disk interface is a full 512K of RAM and the Eprom contains the most comprehensive of Super Basic commands of any interface. A unique 


feature is be able to set up a printer buffer within RAM. 


The design of this unit is of such a high standard that we would suggest that it will not be bettered. Ideal for the work environment and the discerning home user. 


SPL SPL_USE:- File spooler. 

JOBS AJOB SPJOB RJOB:- Job control. 

GET BGET PUT BPUT FPOS:- Direct access files. 

FLEN FTYP FDAT:- File enquiry functions. 

FOPEN FOP_IN FOP_NEW FOP_OVER FOP_DIR VIEW:- 
Examining a file. 

WDIR WSTAT WDEL WDEL_F:- Wild card commands. 


STAT:- Drive statistics. 
WCOPY:- Wild card copy. 
RENAME TRUNCATE 
DATA_USE:- Default directory. 
CLOCK:- Resident clock. 
EXTRAS:- Listing extensions. 


FORMAT RANM_200:- Creates 200 sector RAM disk. 
RAM_USE FLP:- RAM disk emulates FLP. 


PAR:- Parallel printer port with default buffer of 128 bytes. 
PAR_USE SER:- Emulates Serial ports. 

PARF_3K:- *** form feed with 3K buffer. 

PARC_400:- ***<CR> in place of <LF> with 400 byte buffer. 
FLP_USE MDV:- Discs emulate MDV 

FLP_SEC:- Security level. 

FLP_START:- Start up time. 

FLP_TRACK:- Number of tracks. 


The Miracle Systems Expanderam Plugs into the main port on the left of the QL and has an extension plug to enable a disk interface to be plugged in. The advantages of this method of upgrading 
are that the QL warranty is not effected and it runs 1.7+ times faster. A cover is supplied with it to protect the cct. boards. 


The 512K RAM is supplied on a printed cct. board, and the procedure to upgrade is:- 
. Open QL using posidrive screwdriver. 
Remove main ROM and plug the board in its socket. 
Remove main processor and bend up two pins. 
Put main processor back in socket. 
Solder four wires onto processor. 
Put ROM into socket on new board. 
. Solder capacitor onto 5V regulator and test QL. 
8. If all is well put screws back in QL. 
This upgrade gives the QL a total 640K of RAM and any disk interface can be used with it. 
A 90 day Warranty is offered on the QL excluding drives when fitted by us. 
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The Cumana Interface extends onto the Expanderam or can be plugged into the QL 
expansion port if the internal RAM upgrade is adopted. It has an alternate EPROM 
fitted which contains RAM-DISK function as well as the normal toolkit commands. 


3.5” 720K X 720K Dual Cumana drives with NEC mechanisms boxed side by side 
supplied with all upgrades. 









Open Channel is 
where you get the 
opportunity to voice 
- your opinions in 

- Sinclair QL World. 

- Whether you want 
to ask for help witha 
technical problem, 
provide somebody 


Quill copies 
To reply to Derek Coverdale’s 
letter in the April issue While 
there is no simple way to 
introduce the printing of 
multiple copies of documents 
into Quill, it can be easily done 
from SuperBasic by the 
following procedure.’ 

First, start to print one copy 
of the document as normal but 
when the default device of 
printer is shown, do not accept 
that but instead type the name 
of the file, e.g., ‘name’. That will 
produce a standard ASCII file of 
your document, called ‘name 
_lis’ on mdv2_, with all the 
correct control codes from the 
printer driver embedded in it. 

Next, leave Quill and return 
to SuperBasic and run the 
following program: 

100 BAUD 9600 

110 CLS 

120 INPUT ‘Number of 
copies?’ 

;num 

130 FOR i=1 to num 

140 COPY_N mdv2_name_ 
lis to serl 

150 OPEN #3, ser1: PRINT #3, 
//:;CLOSE #3 

160 END FOR i 

It may be necessary to change 
the baud rate or use serlc 
instead of serl, depending on 
the type of printer used. 

Line 150 is necessary to 
prevent the end of one copy 
running into the start of the 
next. YOu can insert more ‘/’ 
separators to get more spacing 
between copies. 

This, however, leads me to a 
question — is any company 
working on an upgrade to Quill 
offering such facilities as 
preserving the justification 
when using double width, 
different type styles and 
proportional spacing — all 
available on the official Sinclair 
printer but not supported from 
Quill, multiple copies, other 
typeface changes such as italics 
and double strike and so on? 

Michael Scott, 
Chester. 


File rescue 
Help! The unthinkable has 
happened and I am having to 
come to terms with the 
possibility that I have lost 
around eight hours of 
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with the answer, or 
just sound offabout 
something that 
bothers you you, 
write to: 
Open Channel 
Sinclair QL 
Petty France 
London SW1H 9ED 


Couiputer input. I was updating 
a draft copy of a 10,000-word 
document I had stored on Quill 
and was careful to make a 
back-up copy of the file as I 
worked through it. When I 
made the last back-up, 
over-writing the previously- 
stored copy, the program 
reported “I/O incomplete — 
press space to continue”. 


In my confusion, I pressed 
the space bar followed by the 
escape key and promptly lost 
the whole document. When I 
tried to re-load the file, the 
depressing message “nota valid 
Quill file” flashed on to the 
screen. | 

It appears that the Microdrive 
was full when I tried to make 
the last back-up and that 
accounts for the “I/O 
incomplete” report. I still have 
the corrupted file, plus its 
associated def-tmp file, stored 
on the Microdrive, so the 
document must still be there 
somewhere. The problem is 
how to get at it, preferably 
without resorting to the rather 
expensive disc-doctor type 
programs. 

Is there any way of re- 
validating the corrupted file so 
that I can at least save some of 
the lost information? I have 
back-up copies of the draft copy 
but the thought of typing-in all 
the amendments again leaves 
me feeling rather sick. Have you 
any miracle cures? 


Ian Tait. 


Editor's Reply: 
Load Quill and set up a page 
format with margins as you 
require them. Then use the 
merge command F3, O (for 
‘Other commands’), M (for 
‘Merge’), and then the drive 
reference and your lost file 
name followed by ENTER. 
Quill will merge your file 
into the blank format up to 
the point where the data 
corruption occurs. You will 
get the diagnostic ‘merge 
failed’ but with luck you 
should then have in RAM a 
sizeable portion —some-times 
all — of your lost file. 
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Dial directory 
Iam compiling a directory of 
QL users who are modem 
owners, to facilitate the 
interchange of programs, ideas 
and hints, and generally to 
increase the technical 
competence of QL owners. I 
would be grateful if you could 
mention this and stress that 
there is no commercial interest. 

If any of your readers own a 
QL and a modem — of any 
description — could they please 
send me the following details if 
they would like to be included 
in the directory: 

Modem make and speeds 
available. Modem software 
make and a brief description of 
the facilities. Full telephone 
number, including area code. 
Postal address. Interests in 
computing, e.g., business, 
machine code, languages, 
utilities, games. Specialities, 
subjects in computing with 
which others could be helped. 
Any other pertinent facts, such 
as membership of IQLUG, 
Prestel and bulletin boards; 
auto dial/answer boards fitted; 
age if under 18. 

If they could also include a 
Microdrive cartridge and a 
stamped self-addressed 
envelope, when I have received 
a few people’s details I can send 
the first version of the directory 
to all those included in it. 

Why should we have to 
subscribe to Prestel when there 
are plenty of people with 
modems and plenty of things to 
say to fellow QL owners? 

Michael Gottlieb, 
22 Gibbs Green, 

Edgware, 

Middlesex. 









Thermal hardware 


Recently I bought a QL from 
Dixons of Taunton. Included in 
the package was a serial 8056 
compact printer. 

I have since encountered a 
problem. No-one sells the 
thermal paper used by the 
printer Could you please make 
enquiries, as this seems a 
ridiculous state of affairs. 

J. Parsons, 
Taunton. 








Printer copies 


I write in response to the letter 
from P. Johnson in the April 
edition. 

First I took the opportunity of 
buying the CGP-115 printer at 
the reduced price in the hope 
that it would be compatible 
with my QL. To my relief, it is 
not only compatible but very 
useful and is now an invaluable 
part of my QL equipment. 

I have the full operating 
manual, a copy of which I will 
happily send to Johnson for a 
small contribution to cover 
photocopying and postage, if he 
will send me his address. 

Second, I would like to say 
how much I enjoy your 
magazine. With its useful 
reviews and informative 
articles, I look forward to it each 
month. The recent Diary of a QL 
user was interesting and very 
funny. It makes a pleasant 
change to find such humour in 
a user magazine. 

The Progs section offers 
some high-quality user 
programs, although they are not 
always as infallible as the editor 
claims, e.g., in Othello QL User 
— August, 1985, line 1730 should 
obviously read: , 

IF (x=1 OR x=8) AND 

(y=1 OR y=8)... 

as x cannot hold values of and 
8 simultaneously and nor can y. 
Still, the mistakes are few and 
far between and only go to 
show that very few people are 
perfect. 


Editor’s Reply: This is one of 
the many letters, programs 
and manuals we received in 
response to Mr. Johnson’s letter 
the April issue. In view of the 
amount of interest shown in 
the CGP-115 printer/plotter, 
we hope to include a full 
review in the July issue. 

We would be the first to 
admit that gremlins have 
occasionally crept into The 
Progs. Hopefully, as you 
suggest, they have been few 
and far between. You may 
have noticed we have tried to 
improve matters by 
standardising the size of 
printed listings and we will 
continue our endeavours to 
ensure programs are bug-free. 
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SU stom\ Sole) Com store 


I bought my QL in April, 1985. 
Abacus did not clone and had 
to be replaced. My machine was 
for the most part used for 
writing reports, for which it was 
reasonably satisfactory but why 
did it keep crashing? Sometimes 
it denied that a Microdrive 
existed, usually MDV2. 
Sometimes it even started 
accessing both Microdrives at 
once. Even with such defects it 
was used regularly at work until 
July. 

Then followed a fallow 


period when I could not use the | 


machine because the printer I 
bought refused to work even 
after repair. After the repair of 
both QL and the purchase of a 
new printer, I was in business. 
It was at that time I decided that 
additional memory and some 
kind of RAM disc driver was 
needed. The whirring 
Microdrive, after writing 2,000 
words, was annoying. 

I went the whole hog in 
January by buying 512K 
additional memory. At the 
Which Computer? Show I 
picked up a PCML plug in ROM 
&22.94 inc. VAT — and a 
Bowthorpe Spike Protector — 
show price £7, usually £14. 


My QL now has 640K anda ROM — 


with RAM disc, spooler and 
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multi-tasking commands and, of 
course, is protected by the spike 
suppressor. That transforms the 
QL from being just another 
boring micro into a proper 
workstation. I can now leave my 
micro on overnight with less 
fear of it crashing. I have more 
confidence in the machine. 

My ideal set up would be: 
QOL JS ROM), 512K add-on RAM 
(PCLM), ROM toolkit (PCLM), 
RAM disk spooler, multi-task; 
green screen monitor (Citadel 
101ql); dot matrix printer with 
NLQ — Centronics GLP. 


Problems I envisage arising 
in the near future will be in 


‘using Metacomco C which 


needs a ROM plugged-in to 
compile. Perhaps getting an 
EPROM expansion board might 
circumvent this problem. Micro 
Enterprises claims to sell one, 
but at £69.95. Will I just be able 
to set up the board and put the 
ROMs in any socket or will I 
need special ROMs with the 
correct starting addresses? 

My experience leads me to 
ask why cannot Sinclair provide 
an upgraded QL — 640K with a 
bigger operating system ROM? 
It might be interesting to do a 
review of such a system 
comparing it to other micros. 

Is it possible to replace the 
Sinclair ROM (48K) with a 


larger ROM? Perhaps Sinclair 

has given up on the QL? 

| P.E. Sutton, 
Nottingham. 






Taxing Problem 
I recently purchased a small 
business system but I find 
myself in the predicament of 
not knowing which software to 
buy to suit the type of 
application I want. The system 
is a QL type JM with Philips 
amber monitor and 
Mannesman-Tally 85 with 
IBM/FX80 mode available. The 
software is required to help me 
run asmall petrol forecourt and 
a small shop. 

I need a well user-defined 
package which will enable me 
to replace my rather expensive 
accountant and still be’able to 
satisfy the Inland Revenue at the 
end of the year; to work out the 
necessary VAT calculations and 
the format to satisfy the VAT 
man; a small interactive 
database which will help me to 
control the small amount of 
stock I handle in the shop. 

All the advert sement sections 
I look at in the magazine for a 
package which might seem to 
fit my requirements appear to 
be far too sophisticated. I hope 
that you might be able to offer 
some advice which might point 


me in the proper direction. 
B.H. Jones, 
Bristol. 


Editor’s Reply: I would have 
thought that any of the 
accounting packages 
available, such as QL Cash 
Trader from Quest or the 
Sagesoft Integrated Accounts, 
would suit your requirements. 
So far as software being too 
sophisticated is concerned, 
surely it is better to have a 
system which caters more than 
adequately for your 
requirements, rather than 
limit yourself to something 
which your business may 
outgrow in time. Ifyou really 
do not want to buy 
commercial software, the only 
other option would be to 
adapt the Psion packages to 
your specific needs. Archive is 
eminently-suited to the type of 
database application you 
describe and, with a little 
effort on your part, a simple 
VAT accounts program could 
be implemented on Abacus. 






Software wanted 
Can anybody help? We are a 
registered charity providing 
hostel accommodation for 
people with mental health 
problems who are unable to 
cope with living on their own 
in the community. 

We are fortunate recently to 
have acquired a QL and would 
like to use it to record our 
weekly rent' returns and also 
our petty cash transactions. 

Our problem is that we have 
nobody with sufficient 
understanding of the QL to 
write a program to meet our 
needs, nor do we have sufficient 
funds to be able to buy any of 
the software available. So we 
are appealing to readers for 
help. Is there someone who 
would be willing to write a 
program specifically for our 
rent returns and/or petty cash, 
or perhaps someone may have 
some software they no longer 
use? I might add that it needs to 
be on Micro drive. 

N.C. Cullyer, 

The Parkview Society Ltd, 

15 Castle Road, 
Torquay, Devon. 
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TEST 


_ The addition of a RAM 
expansion and disc drives 
can transform your QL 
into a powerful 
workstation. Colin Opie 
compares six of the 
systems currenty 


here are many good 
reasons for buying a disc 
interface and disc drives 
for your QL, with perhaps 

“= the most important being the 
much-improved speed and reliability 
compared to the use of Microdrives. Un- 
fortunately, it was not so long ago that 
the relatively high cost deterred many 
people from purchasing such an up- 
grade. The market has now widened, 
with more suppliers available which, in 
turn, has reduced costs. To give some 
idea of the choices open to you, 
suppliers and manufacturers covered 
by this review include Cambridge 
Systems Technology, Sandy (Farmin- 
tel), Micro Control Systems), PCML, 
Eidersoft and Cumana. 

Various disc interfaces and drives 
were tested. Compatibility between 
systems was checked, as were the 
SuperBasic extensions available in the 
disc interface ROMs. The aim has been 
to guide you in your choice of upgrade, 
which will depend on your require- 
ments, while enabling you to obtain as 
much value from your hard-earned cash 
as possible. 

There are so many makes of disc 
drive that compatibility between 
systems becomes important. Contrary 
to general belief, and sincere efforts on 
the part of manufacturers, total com- 
patibility is not always available, even 
with discs. 

Problems generally arise when a disc 
interface has been designed to work ef- 
ficiently and safely with one particular 
type of disc drive. Older-style drives 
which users may be able to obtain very 
cheaply, or may already own, will not 
always prove to be totally acceptable to 
the interface. 

Of course, that is not really a problem 
when all you are doing is choosing your 
new disc upgrade as a complete pack- 
age. If, for example, you buy a 3.5 in. 
disc drive, any software you buy will 
either be on Microdrive — so that you 
are always copying to your own drive — 
or on a 3.5 in. disc. Likewise with 5.25 
in. disc systems. None of the interfaces 
tested produced errors when used with 
the drives normally recommended for 
them by the respective suppliers, or 
when used with 3.5 in. drives. 

The only users who need to be a little 
careful are those who want a disc inter- 








face to control a number of different 
makes of drive, both 3.5 in. and 5.25 
in. You will be glad to hear that all disc 
interfaces except one performed well, 
Creating no read/write errors. The one 
which did complain occasionally was 
the Memodisk interfacce by MCS. That 
was a suprise in that it is the only inter- 
face which is documented as being 
able to diagnose a drive intelligently, for 
example to see if it has a slow track 
seek time, and the type of disc inserted. 

Speed is another important factor. In 
general, the quality of the ROM-based 
disc filing system code, and the physical 
limitations of the disc drives being used, 
are the two major contributors to overall 
speed That means that some. disc 
systems will be slower in operation than 
others. For simple file loading and saving 
the difference in speed will not be 
noticed. If you perform a number of 
database management operations, 
which should include a daily backing-up 
of discs, you may as well be working 
with the fastest drives possible. Con- 
tinuous read/write tests using 3.5 in. 
disc drives revealed that the PCML 
interface was the fastest and that the 
MCS Memodisk was the slowest. The 
difference in speed was around 15 per-. 
cent. That means that if a continuous 
disc operation took seven.minutes to 
complete using the fast interface, it 
would take eight minutes to complete 
using the slow interface. It is for indi- 
vidual users to decide whether the 
speed factor is important when making 
a choice. If all you are doing is perform- 
ing normal Psion program operations 
and SuperBasic program loading and 
saving, you will not really notice the dif- 
ference. 

All disc interfaces for the QL have a 
ROM containing the disc filing system 
code and as many utilities as can be 
crammed in. One of these utilities pro- 
vides the basis for being able to perform 
direct sector reading and writing. That 
feature is an important one if you want 
to purchase and use any kind of disc 
system toolkit, such as that produced. 
by Digital Precision — see Of Disks & 
Drives |I in the March, 86 edition. 
of the RAM-disc if you switch off the QL 
or if the QL locks up for the same reason 
clock display. In essence, you obtain 
most, if not all, of the extensions 
supplied by the Sinclair QL Toolkit, but 
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not the QL Toolkit Il by Tony Tebby, 
marketed by Care Electronics. 

The interfaces by CST, PCML — and 
hence Eidersoft —Farmintel (Sandy), Sili- 
con Express and Cumana all contain 
around 35 to 40 extensions to Super- 
Basic. The interface reviewed which did 
not contain much — only seven exten- 
sions — and did not support direct sector 
reading and writing — was the Memodisk 
by MCS. The Silicon Express interface 
will not read single-density discs. 

It is common practice now for disc 
interfaces to contain some kind of RAM 
upgrade, usually either 256K or 512K 
The RAM upgrade exists either on tr 
same boad as the interface, or as 
separate board between the QL and tr 
disc interface board. In fact, or 
Cumana which limits itself purely to dis 


interfaces. A pseudo-device normally | 


associates itself with disc plus RAM up- 


grades is the RAM-disc. A RAM-disc is 5 
created by formatting the device ‘raml_', | 


or ‘ram2_’ and the like. Its size Is user- 
defined in terms of the number of sec- 
tors it is to have, each sector containing 
512 bytes. For example, the command 
‘FORMAT raml_256’ will create a RAM- 
disc with a total capacity of 256 sectors 
— 128 kilobytes of storage — more than 
sufficient to store the entire contents of 
a single Microdrive cartridge. Clearly 
there must be a 128K of RAM available 
for that to happen. If you buy a disc 
interface with 256K of extra RAM, only 
half of that will be used by the RAM-disc 
in the example. 

The advantage of RAM-discs is that 
they are very fast for loading and saving 
operations. The disadvantage, of 
course, that you will lose the contents 
of the RAM-disc if you switch the QL or 
if the QL locks up for the same reason 
and you have to re-set it. You must 
make sure you have the contents of a 
RAM-disc on a disc or Microdrive before 
either of those things occur. 

Another device, or utility, commonly 
Supported in disc interfaces with extra 
RAM, Is the spooler. A spooler is really 
a program which acts as a printer buffer. 
Instead of sending output to a printer 
directly, the output is fed through the 
spooler. The spooler sets aside a block 
of RAM for storing or buffering the text 
and then controls the sending of that 
text to the printer. 

The advantage is that once the 
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spooler has taken over, control returns 
to the user. In other words, you do not 
have to wait until the document is 
orinted before you can continue to use 
the QL for other work. The saving in 
time, especially for long documents to 
a letter-quality printer, can be very bene- 
ficial. 

Once again, all but one of the inter- 
faces which provide for extra RAM also 
support RAM-discs and a spooler. By 
now you may be able to guess which 
is the odd one out but in case you can- 
not it is the Memodisk by MCL. 

Two of the disc interfaces reviewed, 





the Sandy by Farmintel and _ the 
Memodisk by MCS, also contained 
parallel printer ports with the supporting 
SuperBasic extension ‘PAR_USE’ in the 
ROM. That can be a useful little extra 
but only if you have not circumvented 
the problem of interfacing a parallel 
printer to the QL. 

The Memodisk uses a 6821 PIA chip 
to provide the parallel printer port, which 
for the technically-minded means that 
the interface could be re-programmed 
to act as a parallel inout port. That is 
possible as no buffering exists between 
the PIA and the outside world. 

For the majority of users that facility 








| oii 
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is about as useful as a radio without a 
battery, because no SuperBasic exten- 
sion has been provided to allow them 
to achieve it. You would have to be very 
confident about machine code pro- 
gramming, have a reasonable know- 
ledge of the 6821 PIA, and ensure that 
you did not upset port A of the chip, as 
that is used within the disc interface. 
The facility therefore seems to be more 
of a sales gimmick than something 
which most owners could utilise. 

The PCML, SANDY, CST, Cumana 
and MCS boards all protrude from the 
end of the QL by the obligatory 6cm. 
as dictated by the matching black cowl- 
ing. The Silcon Express interface rests 
completely inside the end of the QL. 

All except the Sandy interface do the 
most sensible thing and keep the power 
regulator heatsink on the outside — ven- 
tilated — side of the board. Having said 
that, the Sandy heatsink is neatly de- 
signed and the interface did not appear 
to suffer from overheating. 

The prices available at the time of 
going to press are shown in figure one. 
PCML prices are not shown because 
their interfaces are available more 
cheaply through other suppliers — see 
advertisements in this issue. Eidersoft 
prices seem high but they include a 
PCML interface, 3.5 in. disks, a mouse, 
Ice, Artlce and utilities. Its 256K extra 
RAM option also includes the Choice 
multi-tasker software. Eidersoft will also 
supply a QRAM 256K RAM module 
which rests inside the QL if you want a 
full 512K upgrade from the company. 
The memory upgrades from Silicon Ex- 
press also fit inside the QL and not on 
the disc interface board. Viglen markets 
the MCS Memodisk interface and disc 
drives. Prices quoted are all inclusive. 

Which system you choose will de- 


FIGURE 1 — PRICE GUIDE 


pend mainly on your requirements. Cer- 
tainly the MCS Memodisk interface is 
out of the running, both in terms of price 
and in terms of the facilities offered. 

In general, the CST options will give 
you the little extra over those from Sili- 
con Express. That is because the latter 
does not support single-density discs 
and its 512K memory upgrade is just 
that it is not an additional 512K. . 

lf you definitely weant a parallel printer 
port you might prefer a Farmintel Sandy 
interface plus drives. The Farmintel op- 
tions would be marginally more expen- 
sive than the cost of, say, an equivalent 
CST system plus the cost of a good 
serial-parallel convertor module — like 
the one from Care Electronics — but the 
result arguably would be more pleasing 
to the eye, tidier, and would still leave 
both the serial ports free. 

If the use of a mouse appeals, the 
Eidersoft packages are worth consider- 
ing. The software which accompanies 
them is very well produced and Artice 
with a mouse is delightful. If you opt for 
the basic system with no extra RAM, or 
the system with 256K of RAM, you are 
likely to Save money compared to buy- 
ing things separately. The 512K RAM 
system is not recommended, as it would 
be much better to buy, say, a CST or 
Farmintel system and then buy the other 
bits and pieces from Eidersoft. 

So, for between £200 and £450 you 
can upgrade: your QL to discs. Within 
that range the systems from CST, Sili- 
con Express and Farmintel provide for 
the easiest ways to upgrade should you 
wish to start small and grow later. Of 
course, if you are the big-spender type 
you could choose a CST Winchester 
system — hard discs — which starts at 
around £1,150 for a 20Mb version 
which includes a single floppy drive. 





Disk 

interface 
Cumana £79.90 
CST £79.95 


Silicon Express £113.85 
MCS _— 
Farmintel £135.00 
Eidersoft — 
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interface Interface 
+512K +1disc 


— £219.85 £321.40 
£219.90 = £275.00 
£238.85 £199.00 £170.00 
£299.00 - — 

£249.00 £235.00 £335.00 
— = £399.00 


interface 
+ 2discs 


Interface +256K Interface + 512K 
+ 2discs + 2discs 

— £405.00 

— £395.00 

£408.00 £498.00 

£414.00 £449.00 

£499.00 £594.00 
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New: Prospero's 


profess! 


PRO PASCAL & 
PRO FORTRAN-77 
FOR SINCLAIR OL 


OY 


fe) 
Pro Pascal is validated to ISO 7185 ° 
Class A (no errors) on the Z80 processor ® 
under CP/M and the 8088 processor under » 
1 PC-DOS. This provides a 
_ guarantee that the compiler is complete 
a and works perfectly. 


NO BUGS ) 
YOUDONT 

“HAVE TO 

: maa 


Ideal for 

- Sinclair software developers 

- schools and colleges 

- students of computing 

- development of personal skills 
- solving technical problems 

- training institutions 


16 digit 
Single and double precision 


IEEE format arithmetic gives 
7 or 16 digit precision 


VAT included 


onal language 


0) a oS Pe FeO 


“Incredible 
value! - Endorsed 
by Sinclair Research 


y 


“FORTRAN 77 


4 of ANSI Bottran 77 with no omissions ty = 


and many useful extensions 
a 8 


USE THE LANGUAGES 
‘THE PROFESSIONALS ODO: 
PASCAL AND FORTRAN 


Lazy I/O 


All files closed on 
exit from procedure 


Compilers include: 
compiler, linker,run-time 
libraries, librarian, X-ref 

program, sample programs, 
graphics routines, 200 page 


GRAPHICS 


Graphics routines included 


At Prospero we specialise 
in writing language compilers. 
We produce the best possible 
compilers, conforming to the 
appropriate standard, and giving 


REVIEWS & INFO programmers a secure base on 


Call 01-741 8531 for a 
free info pack with data 
sheets and magazine 


1 ! ‘ : : 
ee oo lso available from Sinclair 


specialists & distributors 


BIG 


Compiles big programs 
>10000 lines... 
>1000 identifiers... 
Separate compilation 
to build libraries and 
massive program suites 


Used at 5000 sites 
around the world 


Prospero Sorwars Ltd 


= 190°Castelnau, London SW13 9DH 
=| England. Telephone 01-741 8531. 
=! Telex 8814396 PROSOFG. 
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Mail order > 


manual. Supplied on 3 
microdrives and ROM 
cartridge. Runs on 128K 
QL. Supports disk drives. 


{"Pro Pascal is not only ISO-validated, 
Jit is also a Superb-quality and very 
{full software development tool." 

1 Personal Computer World Nov 1985 


It's easy to order! 
Credit card holders phone 01-741 8531 
Access, Visa, Diners & Amex taken. 


Send this coupon with cheque to Prospero Software, 
190 Castelnau, London SW13 9DH, England. 
Post free in UK - including VAT. 

Overseas orders at £86.91 + £3 post and packing. 
Allow 28 days for delivery. 

Please supply ___ copies Pro Fortran-77 at £99.95 
Please supply ___ copies Pro Pascal at £99.95 
(Sinclair) I enclose payment for £ 


Telephone no 





In case of query ring 01-741 8531 or telex 8814396 
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packages supplied with 
the QL, 
spreadsheet in my opinion 
is the most impressive and 
useful. Compared to other spreadsheet 
programs such as VisiCalc, and Super- 
Calc |,‘ll and Ill, it is easier to use and 
more powerful. This short series 
examines the ways Abacus can be used 
for a wide range of calculations and in- 
f ion recording. Although spread- 
usually are thought of as nothing 
than a way of keeping balance 
s or other simple financial opera- 
, In practice they are ideal for use 
ucation, engineering, statistics and 
ranches of mathematics. They can 
used to keep a telephone directory, 
organise events, to solve equations, 
demonstrate how something is 
orked out and to play games. 
In the first part we look at how to go 
bout creating a simple spreadsheet for 
a traditional firarctal application. 
A new idea : 
The idea of'a spreadsheet has its origins 
long before computers were invented 
with the use of specially-ruled paper, 
complete with headings, to make ac- 
counting easier. In that form the spreaa- 
sheet left the user to do the arithmetic 
needed to fill in entries such as “SUB 
TOTAL =” and the only advantages 
were standardisation and ready-made 
! organisation. In the late 1970s with the 
] personal computer revolution in full 
swing, two programmers, Dan Bricklin 






















and Bob Franckston, evolved the bril- 
liant idea of the electronic spreadsheet 
which, would provide a form to allow 
you to input data and would also work 
out the arithmetic for you. 

That single, simple idea of combining 
the spreadsheet layout with the cal- 
culating power of a computer produced 
a revolution of its own and overnight 
everyone was producing or using 
spreadsheets. Things have quietened a 
little since those early days and. now 
there is a tendency to think that spread- 
sheets are such obvious pieces of soft- 
ware that they did not need inventing. 
All | can say is that in the days before 
the spreadsheet revolution there was 
nothing obvious about how useful they 
would be. 









SsedPyeRQne was about spreadshegts 

that thetrrercts eee for @*ery- 
g, regardless of Whiter.) Rwas a 
ble application or not. 
lensetter ha or handled By a word pro- 
BAor a database and part of be- 
gexpert in the use of Abacus is 
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SUS With Quill, Archive and Easel 
WaUGe a complete solution will be 
bed in a later article. 


y 





f the four applications 


the Abacus | 


seseson of the problems with how impre:# moved round the spreadshe¢t, using 


hen it needs help. The use : 


Getting started 
The difficulty with learning to us 
reasonably useful piece of softwarelis 
that it is likely to have a range o 
mands which includes some 
every possibility. In practice, 
those commands are used infre 
and the day-to-day use of the softwé 
centres on a few important comn 
With that in mind, this month’ 
Art looks at the basic principle 
a spreadsheet and then expla 
steps in constructing a simple ae 
sheet. 

All you have to do to get Abacus run- 
ning is to have a cartridge containing a 
copy of the Abacus master in Microdrive 


1 when you switch on or re-set the . 


machine. Alternatively, you can type 
LRUN MDV1_BOOT which will load and 
run a SuperBasic program which sets 
up the QL and then runs Abacus. The 
standard BOOT program can be mod- 
ified to advantage, as we will see later. 

What you see on the screen depends 
on whether you are using a monitor or 
a TV set. By default, the TV display is 
only 64 characters wide but the monitor 
display is a full 80 characters to a line. 
You can change the Abacus display 
mode at any time to 40, 64 or 80 charac- 
ters per line by use of the Design com- 
mand — press F8, then D, then D again 
and then one of 8, 6 or 4 for 80, 64 or 
40 characters to a line respectively. 


Re-usable Paper 
The way Abacus is displayed is fairly 
irrelevant to the way it is used. The main 
part of the display is a grid of cells, like 
a piece of paper ruled into rows and 
columns. The rows are numbered 1 to 
255 and the columns A to Z and then 
AA, AB and so onto BL. A cell is referred 
to by giving its column letter and row 
number. Thus the cell in the top left- 
hand corner is A1 and the one in the 
bottom right-hand one is BL255. Much 
like the ruled paper the display repre- 
sents, it is wnat you can put into the 
cells which makes the spreadsheet use- 
ful. 

At any time one of the cells is special 
in that it contains the cursor; that is the 
active cell and its contents can be 


cha Dged DY TypTitres ine keyboard. As 


aright expect, the Gwxsor can be 


the arrow keys alongside the spade bar, 
and so any cell can be made the atative 
cell. If you want to move the cursor Ne, 


re "eres daglly to a cell without having to move 
“Tr 





eal the intermediate positions, 
you can TRESS ES 9 cell reference 
and jump straight theretercceses oe08 
Most people find it easier to press the 
arrow keys until they Succeed in moving 
the cursor where they want It. The only 
exception is that pressing F5 followed 




























Abacus is a remarkably <_ 
versatile program capable 
of many diverse x : 
applications. Mike Jameg#s 
introduces our series on || Oo 
getting the most fromthe, | _ 
Psion spreadsheet. 3 


by ENTER takes the cursor to cell 
and that acts as a kind of HOME co 
mand. ' 
When you have the idea of moving 
the cursor it is time to begin enteriigy 4: 
data into cells. There are three types /Of “NSS 
entry you can make to any cell—numene 5 y;: 
data, text data and formulae. For 
example, if you position the cursor a 
A1 and type 100 the figure 100 appears I 
on the data entry line at the bottom of - 
the screen. That can be edited using \ 
the cursor keys in normal SuperBasic \ 
fashion, that is: 


-_> move cursor right 
<— move cursor left 
V move cursor to far right 


~ 


~ move cursor to far left 
CTRL <-— delete character to the 
left of cursor 
CTRL —> delete character under 
_ cursor 
Notice it implies that once oe have 













large cursor marking the active i 
can regain control over it by pResst 


cell, or by pressing ESC, WAR 
what you have typed ang 
active cell unchanged. 


you can use the QL as 
re-usable sheet of Nar 





width, it will spill 

Bal TNS SO me 

S are "enratstys 
are erase 
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The use of formulae to create a kind 
of ‘active’ piece of paper is the real key 
to the power and usefulness of spread- 
sheets and much of the remainder of 
this series will look at the way formulae 
can be created to solve all kinds of prob- 
lems. In particular, we will examine the 
range of functions which can be used. 
Functions extend the range of things 
it is possible to do with spreadsheets. 
For example, if you were asked to write 
a spreadsheet which found the sum of 
a column of 10 numbers, the only way 
you could do it without a function is to 
write A1 +A2+A3+A4+A5+A6+A7+ 


An empty cell is one which has not 
been used to store anything and that is 


different from acell which contains zero, Formulae and functions A8+A9+A10 into a cell and that clearly 

“ ” (a blank) or “” (the null string). Ifthe Itis the third type of cellentry, formulae, | would be a difficult method to extend 

adjacent.cells are not blank, the text is which makes the spreadsheet a really to the sum of 100 numbers. 
truncated tofitthe.space available. It is powerful tool. A formula is a piece of Fortunately, Abacus provides the 
if 


eta to notice that although text — arithmetic which can include cell SUM function which will work out the 
“may references. For example, ifyoutype 100 sum of any partiaheolumn.or partial row. 
inA1 and 200 inA2, thenA1+A2inA3, The simplest way to specify a partial 
then As will show the result of that row or column is to reference the first 
calculation, i.e., 300. No matter how and last cell so, for “example, 
often you change the entries in A1 and SUM(A1:A10) will add the contents of 
: A2, AS willalways show theirsum.Note all the cells in column A from A1 to A103. 
\ —_ inal dual. cla i fen that cell A3 appears inthe spreadsheet __In the same way SUM(A1:D1) will add. 4 
1 theirir fancied or pictgigeno.nr sureyou_ .as if it contained a number but when contents of the cells in row 1 from yw 
my ee <now iwbatt is stored din acell theNagttom you move the cursor over the contents] Agsto D1. 
A ine-of the as : line, at the bottom of the display, shot : iving the first and last cell in a patie 
; complete contentseefthe active cell. S gthat it contains a formula. r column is called a rangg,fer- 
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ence and many functions can perform 
operations on groups of cells specified 
in that way. As well as partial rows and 
columns, many Abacus functions will 
operate on a block of cells specified by 
giving the cell in the top left-hand corner 
and in the bottom right-hand corner. For 
example, the range reference A1:C10 
defines a block of cells three columns 
wide and 10 rows deep. 


Commands 

Although entering data and formulae are 
the major occupation of any spread- 
sheet user, the need to modify some 
aspect of the spreadsheet often occurs. 
You might discover that you need an 
extra column in a spreadsheet or need 
to delete a column. Such operations are 
achieved by using a range of special 
Abacus commands. You can see a 
complete list of commands at the top 
of the-screen by pressing the FS key. 
Selecting one of the commands is a 
matter of typing the first letter of its name 
and then answering the questions it 
asks. If you want to save a spreadsheet, 
press F3 followed by S and then type 
the filename by which you want the 
spreadsheet to be called. 

Although the commands are all 
reasonably easy to understand, know- 
ing how and when to use them can be 
a different matter. Rather than going 
through each command in turn and exp- 
laining its action, the rest of the series 
will look at the way commands are used 
during the construction of real spread- 
sheets. 


Spreadsheet programming? 
There are two attitudes to the use of 
spreadsheets. The first regards a 
spreadsheet program as a useful in- 
teractive tool for recording data and 
working things out. In that case the per- 
son typing data and formulae is one and 
the same. The alternative view is that a 
spreadsheet complete with titles and 
formulae is prepared for a relatively un- 
skilled person to use. That second at- 
titude is akin to thinking of the process 
of spreadsheet creation as something 
like programming. 

It is, in my opinion, the best way to 
go about things, because it tends to 
save time. Instead of having to construct 
a special spreadsheet for each set of 
data it is much better to spend a little 
more time initially and produce a better- 
quality spreadsheet which can be used 
time and again with different data. That 
does not mean that | do not occasionally 
use Abacus to add the odd column of 
figures or do a one-off calculation; it is 
just that if | identify anything | am likely 
to do more than once | try to construct 
a high-quality spreadsheet | can use 
again. 

As a way of explaining how to con- 
struct a re-usable spreadsheet, con- 
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sider the problem of keeping track of 
purchase invoices for preparing quar- 
terly VAT returns. Essentially the inform- 
ation you have to record is the date 
of the purchase, the supplier, a brief 
description of the item, its VAT rate — 
.e., O% or 15% — its price including VAT 
(its gross price), its price excluding VAT 
(its nett price) and the amount of VAT 
paid. The object of the exercise is to 
vind the totals of gross price, nett price 
and VAT. 

The first stage in producing this 
simple spreadsheet is to give approp- 
riate titles to the seven columns — A to 
G — required, in row 3, say. Second, we 
should arrange for it to provide the 
answers needed. If we assume around 
20 purchase invoices per quarter, it is 
reasonable to enter SUM(E1:E24) in 
E255 SUMIRIE 24) ~ <i, 2bZo. and 
SUM(G1:G24) in G25. At that point the 
best thing to do is to enter a line of test 
data, such as: 


See 





The first thing which becomes appa- 
rent is that some of the columns are of 
incorrect size — far too much space for 
“Date” and far too little space for “Item” 
and “Supplier”. Column widths can be 
changed by using the Grid command. 
Press F3 then G and then select the 
Width option by typing W. Following that 
you can specify the width of any number 


of columns. Using that command the. 


columns are set to the following widths: 





moving the cursor over G5, typing 
Ccol=E5*d5/(1+d5) ENTER, then in re- 
sponse to the question FROM type 5 
ENTER and in response to TO type 24 
ENTER. The col= and row= com- 
mands are a quick and convenient way 
of setting all the cells in a partial column 
or row to a single entry. This process is 
a little more complicated than it appears 
at first but more of this next month. 

In the same way the NETT column 
can be calculated automatically by mov- 
ing the cursor to F5 and typing col=e5— 
gs and then answering the questions to 
produce FROM 5 TO 24. The final touch 
is to fill-in a default value for the VAT 
RATE by entering .15 into all the partial 
column D5:D24. Following that, all the 
units have to re-specified to make 
column D show as a percentage and 
columns E, F and G show as money. 

As the spreadsheet stands, it can be 
used to record purchase invoices by 
typing-in the date, supplier, item and 






the gross price. The nett price and VAT 
will be worked out automatically for 
each entry. If an item is zero-rated for 
VAT, it is also necessary to enter a O in 
the VAT RATE column but if that is done 
the VAT and NETT prices are still 
worked out correctly. Then add a few 
ruled lines, by entering rept(“—”,80) into 
A24 and A26, and few more titles. To 
make the ruled line appear in all of row 





If any of those column widths proves 
incorrect it is easy enough to use the 
Grid command to change them at a later 
date. The next thing to do is to tidy the 
appearance of the numbers in the final 
four columns. That can be done by 
using the Units command. Columns D, 
E and F all need to be displayed in 
money format — press F3, U, ENTER, 
M, ENTER and E1:G25 — and column 
D needs to be displayed in Percentage 
format — press F3, U, ENTER, P,O and 
D1:D28: 

Next the working part of the spread- 
sheet, the formulae to calculate the VAT 
and NETT given the GROSS and the 
VAT RATE. It is not difficult to work out 
that: 

VAT = GROSS * VAT RATE 


(1+VAT RATE) 
NET = GROSS — VAT 


The first of those formulae can be en- 
tered into all the cells of column G by 


and 


24 you have to use the Rubout com- 
mand to erase the entries in D24:G24. 
Improvements? 

Even though this VAT invoice spread- 
sheet looks as if it is finished, it still leaves 
much to be desired. Some of the prob- 
lems we can do something about by 
altering the spreadsheet; some have to 
be solved by careful use. For example, 
as the spreadsheet stands you will find 
that after you enter the Gross price the 
VAT is calculated correctly but the Nett 
price is shown incorrectly until you enter 
the next Gross price. 

That is because the entire spread- 
sheet is re-calculated each time you 
make an entry in row order. First the 
value of A1 is calculated, then B1, then 
C1 and so on until row 1 is complete 
and then row 2 is calculated in the same 
way, then row 3 and so on until all the 
cells have been evaluated. With that 
order of calculation in mind you should 
be able to see why the Nett price is 
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incorrect the first time it is calculated. 
As Nett price is in column F it is cal- 


2 2 culated before the VAT in column G but 

its formula, NETT=GROSS=VAT, in- 

VAT — ist Quarter volves the VAT value which at that stage 

is not known. The next time the spread- 

Supplier Item VAT Gross Nett VAT sheet is re-calculated, everything is 
Rate satisfactory because the VAT on that 


F. Bloggs GLGomputer 15% €22885 £190.00 eg5.a5) OOS Price Is known. There are two 


Acme Computers Disks 15% £10.00 £8.70 £1.30 | Solutions to the problem. You can alter 
GPO Stamps 0% £10.00 £10.00 £0.00| the order of the NETT PRICE and VAT 


Local Shop Batteries 15% £460 £4.00 £0.60 | Columns or you can use the Xecute 
AnytownGarage Petrol 15% £12.20 £10.61 £1.59 | Command to re-calculate the spread- 
GPO Stamps 0% £3.60 £3.60 £0.00} sheet until the values are shown cor- 
Outmac PrinterPaper 15% £36.00 £31.30 £4.70 rectly. 
Anytown Garage Petrol 15% £12.70 £11.04 £1.66 A more serious problem is that we do 
15% £0.00 £0.00 £0.00/ jot always wantto enter the Gross price 
£0.00 £0.00 £0.00} and have Nett and VAT calculated. 
oi £0.00 roi Sometimes we know the Nett price and 
£0.00 : want the Gross and VAT calculated. In 
£0.00 other words, our ideal spreadsheet 
£0.00 would permit the entry of a value in either 
the Gross price or Nett price columns 
and would work out the remaining 
columns automatically. That can be 
done and in a way that eliminates the 
order of calculation problem mentioned 
by using one of the many Abacus func- 
tions. Can you work out how? All will 
be revealed next month. 





ICON GRAPHICS 
for the Sinclair 


Please send me 
[ ] Copies of 3D SLIME at £12.95 each .......cees 
[ ] Copies of CAD PAK at £14.95  cicccccccscccsssssess 
Please add 75p P&P per ite@iM  .....cccecesecseeees 
TAL os nacanSedtex cece 
Make cheques/postal orders payable to Datalink Systems 


CAD PAK computer aided design : and send to: Datalink Systems, Glan Gors, Ynysals, Dyfed 
package, easy and fun to use.A ~ SY24 5JU 


powerful icon driven graphics package. Name 
eae Address 


DATALINK SYSTEMS (WALES) 
Glan Gors, Ynyslas, Dyfed SY24 5JU. 
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SOLUTIONS 


FIGURE 1 


100 
110 
120 
130 
140 
150 


160 
170 
180 
190 


O@GQ_MS#3,SKD1_MKEM_SWAU 
FXYMZP = 0 

OCOEBV FSIKSWXZ 

TR RCU(#3) JYWG YSEQ ANDFNRSU 
OUXDD#3, NTNF 

XV TZTL>96 VJA AGAS<1235 VKIS 
IOIA=MSME-32 


WU SYSK764 UIZ ZFZR<91 UJHR 
HNHZ = LRLD + BTUIVL 

KYKAXR GAOIH 

MK IOIA<91 DS@A SMYK JTHBA 


FIGURE 2 


100 
110 
120 
130 
140 
150 


140 
170 
180 
190 
200 


OPEN_IN#S3,mdvi_data_file 
offset = O 
REPeat codeloop 
IF EOF (#3) THEN EXIT codeloop 
INPUT#3, char 
IF char?96 AND char<i23 
Char=char-32 
IF char>64 AND char<91 THEN 
char = char + offset 
REPeat range 
IF char<91 THEN EXIT range 
char = char —- 26 


THEN 


FIGURE 3 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
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100 CLS 
110 n=0 : A= 
120 REPeat loop 
130 c= 
140 
150 
160 : 
170 END REPeat loop : CLOSE#I11 


OPEN_IN#3,mdvi_data_file 
offset = 0 
REPeat codeloop 


IF EOF (#3) THEN EXIT codeloop 


char = CODE (INKEYS$ (#3) ) 


210 
220 
2350 
240 
250 
260 





ZFZR = DJDV —- 26 
JTK ZNZPMG FPDXW 
ILDJQ AGR#(DIDV) ; 
TLMAND = ZRSGTJ + 1 
VDLY 

KNFLS CIT#(FLFX); 
LVM SQ 

QAR GUGWTN XKACKOPR 
FPTYL#3 


END REPeat range 
PRINT CHR (char); 
offset = offset + il 


ELSE 


PRINT CHRS (char); 


END IF 
270 END REPeat codeloop 
280 CLOSE#S3 


IF char>9&6& AND char<i23 THEN char=char-32 


IF char>&4 AND char<91 THEN 

char = char —- offset 

REPeat range | 
IF char<91 THEN EXIT range 
char = char —- 26 

END REPeat range 

REPeat inc 
IF char>64 THEN EXIT inc 
char = char + 26 

END REPeat inc 

PRINT CHR (char) ; 

offset = offset + il 


: OPEN#1i1i1,seri1 
: EERE CA) 2: 2 = 


CODE (CINKEY$ (—-1)) 
IF c>=A AND c<=Z : 
PRINT#11,CHRS (c) 5 
PRINT CHR (c);5 


=BO 
290 
300 
310 
320 


CODE ("Z") 


c=c-—n+26*% (c-—n<A) : 


SESE 
PRINT CHRS(char) ; 
END IF 
END REPeat codeloop 
CLOSE#3 








n=n* (n< 26) +1 





The answer to 








April’s encrypted 
enquiry. And, for 
those on the ball, 
another chance to 
win a year’s 
subscription. 


] eeling 

| generous, I let 
| you have life 

| easy in the April 
}] issue, where 
you had to perform a simple 
decryption using an 
accidentally encrypted 
encrypter. Some readers 
found it so easy that they 
spent a few hours trying to 
find a further code within 
the decoded question. How 
culd they possibly think that 
I would play such a dastardly 
trick? 

In case you didn’t get it, 
the encoded question HPY 
PESE RQUYMKGSH EW 
EXGJNV BNET VKI 
XZHVMKCP DZ BYTJH 
BVRB? decoded to HOW 
MANY KILOBYTES OF 
MEMORY DOES THE 
STANDARD QL MICRO 
HAVE? to which I expected 
the answer ‘128K’, though I 
was willing to accept all the 
entries telling me the result 
with all the other bits of 
ROM memory included. 

The editor’s random 
encryption. device mixed all 
the entries, and finally 
decided on M. P. Slade of 
Fareham, Hampshire who 
receives a year’s free 
subscription. 

Most people spotted that 
it was a fairly simple 
ASCII-based substitution 
code, with the added 
complication of an 
incrementing offset. The 
original encrypted 
encryption program — figure 
one — should eventually 
prove to be the true 
program shown in figure 
two. This time, indentation 
has been used to show the 
true structure. There are 
many ways of spotting the 
encryption method. 
Particularly easy targets 
were the OPEN_IN statement 
in line 100 and the two 
PRINT statements in lines 
220 and 250. 
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Thus, where the first line 
—line 100—should start with 
OPEN_IN, the ‘QO’ is 
substituted correctly. 
Following this, the ‘Q’ is 
offset by one from the 
original ‘P’, then the ‘G’ is 
offset by two from the ‘E’, the 
‘Q’ is three from ‘N’, and so 
on. Each time the loop was 
executed, offset was 
increased for the next letter. 
As I mentioned, it was based 
on the ASCII characters, 
therefore the REPEAT range 
loop was needed to ensure 
that the encrypted character 
was an upper-case letter. Any 
lower-case letters in the 
input were converted into 
upper-case prior to 
encoding, so it is not 
possible to decode them 
back to their original but 
only into upper-case. 

I would like to thank R. A. 
Lang for his interesting letter 
and his deciphering 
program — figure three. It 
uses the same variable 
names as the encryption 
program, so it should be 
reasonably easy to follow. 
Two additions were 
necessary to use the 
program to decipher the 
encryption routine. First, 
INKEY$ has been used 
instead of INPUT, because 
the latter can deal only with 
representations of ASCII 
characters, each followed by 
a carriage return, as they are 
read from the Microdrive 
File — mdv1_data_file. 
Second, an extra REPEAT 
loop — REPeat.inc — was 
necessary to convert back 
into the correct range. 

Finally, before we move to 
the next problem, figure 
four shows a very short 
decryption program, sent by 
Thanos Stassinopoulos. 

If this one does not keep 
the micros whirring and the 
brains addled, my name is 
not Quentis Lozenge. A few 
years ago, I visited a 
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mathematician friend and 
was surprised to find him 
counting ball bearings. On 
enquiry, he told me that a 
colleague had given him this 
phenomenal number of 
objects, asking whether he 
could find any interesting 
relationships. 

Leaving him to his tedious 
task, it was only recently I 
saw him again. He told me 
that after only a few years of 
counting, he had discovered 
that the total number of ball 
bearings was a palindromic 
number, with all the digits 
the same. Further, he 
realised quickly that he 
could use all the ball 
bearings to form two 
pyramids — he was a smart 
fellow. One of the pyramids 
was triangular, where each 
ball bearing rested on three 
others, and the other was 
square, with each ball 
bearing supported by four 
others. 

He then told me that, by 
remarkable coincidence, the 
combined levels on the two 
pyramids was also a 
palindromic number. 

Puzzling over this very 
unlikely situation, I asked 
my faithful QL to work on 
the problem. It told me 
quickly that a triangular 
pyramid of level six contains 
56 ball bearings and a square 
pyramid of level five 
contains 55 ball bearings. 
That of course, gives a 


combined level of 11 (6+5) 
and a total number of 111 
(56+55). Both those 
numbers are palindromic 
and the latter contains only 
the digit one, satisfying the 
requirements. That cannot 
be correct, I thought, 
knowing how long my 
friend had spent counting 
the box-full and asked the 
OL to find the next lowest 
number. 

Knowing that each ball 
bearing is one centimetre in 
diameter, can you tell me the 
combined heights of the two 
pyramids, as measured from 
the floor to the top of the 
highest ball bearing? To the 
nearest centimetre will be 
satisfactory. 

Two definitions may help. 
A palindrome is a number 
which reads exactly the 
same when reversed, such as 
1356531 or 979. A triangular 
pyramid is a pyramid where 
each ball rests on three balls 
below it, then six, 10, and 
so on. A square pyramid is 
below it, then six, ten, and 
so on. A square pyramid is 
where each ball is supported 
by four balls on the next 
level. Thus, after one ball at 
the top, there will be four on 
the second level, nine on the 
third, and so on. 

Remember that the level 
is the number of layers in 
each pyramid, not the 
height. When you add the 
levels, you should have a 
paladromic number. Adding 
the total number of ball 
bearings in both pyramids 
should give a palidrome, 
where all the digits are the 
same. 

As usual, I shall be 
interested to see any elegant 
proofs or programs for this 
problem. When submitting 
programs, please remember 
that we have only limited 
space, so I will not be able 
to feature any lengthy 
solutions. 








All entries must be 
written on the panel 
provided on this page. 
Any other form of entry 
will be disqualified. 

Entries must be sent by 
post to: 

Puzzle Page, 

Sinclair QL World, 

79-80 Petty France 

London SW1H 9ED 
to arrive no later than 
Friday, June 17, 1986. 
Please mark the envelope 
‘Puzzle Page’. 

The winner will be the 
first correct entry drawn 
from the editor’s fez. In 
the event that nobody 
submits the correct 
combined height, the 
winner will be the person 
with the nearest answer. 

All entries will be 
judged by the Editor, 
whose decision is final 
and no correspondence 
will be entered into 
regarding the result. 


ENTRY FORM 
Combined height = 
aed 


adress: 
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FOR THE SINCLAIR QL:- 
JOSS £15 on mdv or 514’ flp, £17 on 314’ fip 
Forget syntax errors and mistyped names in file commands! Just move a Cursor 
and press SPACE. Cursor keys or joystick allow access to up to 8 microdrives 
and all the discs your interface will handle, with up to 150 files on each. Scroll 
& print directories, COPY, DELETE or PRINT any file, select TV or Monitor mode 
before LOADing/RUNning a program. Use keyboard only to set date or label a 
medium. Easy to use with Psion or other software. No silly icons to learn — 
JOSS will tell you what it’s doing! Mass copying/printing utilities and programmer’s 
toolkit. Specify disc size, tracks and interface (CST, Cumana, PCML, 
MicroPeripherals) or microdrive only. 


REPQLT ..eccssesssssssscesccccceseeess £11 ON 2 Mdvs or 1 312" fip, £9 on 51/4” fip 
For use with ARCHIVE 2, contains 1300 useful references and a search/print 
program. Find programs, articles and reviews buried in the magazines on your 
shelf! Cheap updates of earlier editions. 


Melv Extension Cabsie (8" scscscssssssssscsssccsssssssssssscssenseccenssscsescecsisesssss OSOO 
Add ZX Microdrives to your QL. 


JOYSTICK AGATE cscisissecissscssentcosasssssessssssunspivertarigesssenjyenapusintgtaeds: MLO 


FOR THE QL, SPECTRUM, (ALL), BBC & ELECTRON:- 
WD Morse Tutor £4 cassette, £6 mdv or 514”, £8 312” 
Teach yourself to read Morse Code. From absolute beginning to 18 wpm! Feedback 
on screen or printer. Random letters, numbers or mixed, 100 random sentences, 
many helpful features include phonetic speech via Currah Micro-Speech 
(Spectrum). Discs unsuitable for BBC B+. 

We export hardware and third-party software. Ask for lists 


PAYMENT:- 
In advance, in STERLING on British bank branches, international Giro, Postal 
Order or ACCESS/MasterCard. Add £1 outside Europe for AIRMAIL. 


FROM:- 


WDSoftware aw, 


Hilltop, St Mary, Jersey, C.I. Tel: (0534) 81392 


QEP Ill Advanced EPROM Programmer 


The QEP III EPROM programmer was designed specifically to meet the need for 
It is cased, with resident 
firmware in ROM and fits in the QL expansion slot or an expansion unit. 


QEP III provides verification of EPROMS at 4V 4.3V 4.7V 5V 5.3V 5.7V and 6V: 
under and over voltage verification is essential for reliable EPROM service. It 
also features fast programming at voltages of 12.7V, 21V and 25V. 


QEP III can program 16k to 512k EPROMs with standard pinouts, or the data 


a highly reliable means of programming EPROMS. 


and address pins may be re-assigned for ease of PCB layout. 


reload the data and it can program just part of an EPROM. 


QMON Monitor Debugger 


essential for effective machine code debugging. 


MC68000 assembler for correcting or patching code. 


‘the invisible trace, you can even breakpoint ROM. 



















0954 50800 












QEP III can program EPROMs for multiple EPROM sets without any need to 


QEP III is fully menu driven, making it not only powerful but easy to use. 


QMON II is the debugger for the QL: only QMON II has all the features 


QMON II has a single line assembler / disassembler - not just the 
simple disassembler of other monitors, but a complete memory editing 


QMON II has comprehensive trace facilities - not just single stepping, 
but multi stepping, invisible trace, back trace and a macro command 
executable every trace step. You can trace to a printer or a file. 


QMON II has comprehensive breakpoints - not just on instruction 
addresses, but on register values and memory values as well. With 


QMON II has pull-down windows - not just the fixed windows of other 
monitors but windows that restore the QL's screen after use, so that 
QMON can be used with programs that use the screen themselves. 


QMON II Mdv / 54" 


Dept W3 ‘ For more information on these and other 
24 King Street Sau iae 7 hua / 5a mebet: QJUMP products, please send an SAE. 

Rampton QEP III £115.00 If your QL dealer does not have the 
=o QFLP (MP) bare EPROM £14.95 products you require, you may order direct, 


Please add £2.00 for 34" disk. 
All prices include VAT at 15%. 








FAST DELIVERY OF QL 
DISC DRIVES 


3.5” 1 Mbyte floppy disc drives, internal power supply, complete with disc 
interface, utilities, manual, and optional RAM. 




























INTERFACE SINGLE DUAL 
UMMM lel teseteretrercrerecescscectrcceytrvacecstrvcerrietencceerctssvetessetress £230 £310 
Super Qboard plus parallel printer interface .............. £276 £356 
Super Qboard plus 256K RAM + printer interface .... £355 £435 
Super Qboard plus 512K RAM + printer interface .... £390 £470 
Gumana DIUS_ 256K EXDanGarain ssssecscssccesscvssgssssawseapss £325 £405 
Cumanasplus OrZRiExpandaram 1.001100... 2h Alseceudoes £355 £435 





Please write or call for prices of other disc interfaces 
Box of ten 3.5” DSDD Disks % DISCOUNTS * 


See our advert 
in the classified 


TWO MICROL +: 


Read and write microdive sectors from basic and assembly language programs 


QL MDV EXTENSIONS TOOLKIT £9.99 
Adds six functions to Basic allowing read/write/verify of microdrive sectors, 
reading of medium names and “fingerprint” from sector headers, and includes 
a repeat format routine. An eight page manual explains the functions, details 
the microdrive format and uses example programs supplied on microdrive. 


QL MDV ASSEMBLY LANGUAGE TOOLKIT (Source Code) £29.99 
Over 1000 lines of fully commented assembly language source code to a set 
of routines equivalent to the above, but with some additions. An eight page 
manual explains microdrive format and how to implement a copy protection 
scheme as well as QDOS-like routine definitions. 


BOTH THE ABOVE TOOLKITS ON ONE MICRODRIVE 


COMPWARE Also sell a wide range of QL peripherals (monitors/printers/ 
modems/EPROM programmers) and software. Please send SAE for full 
price list. 


PRICES INCLUDE VAT AND DELIVERY 
OVERSEAS CUSTOMERS — WRITE FOR EXPORT TERMS 


TUNEL [aja] my 57 REPTON DRIVE, HASLINGTON, 


CREWE CW1 1SA 
Telephone: CREWE (0270) 582301 
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QTK II Super Toolkit 


QTK II, the QL Super Toolkit, is a rewritten 
version of the original QL Toolkit. 






















QTK II has full networking for file serving, 
messaging etc., PRINT USING, wild card 
copying, deletion etc., programmable keys, 
last line recall, SuperBASIC editor, default 
directories, alarm clock ete., etc., etc. 


—Esséntial for all serious QL program 
developers and educational establishments, 
it is available in ROM and (in a configurable 
form but without the network facilities) on 
Microdrive or floppy disk. 


QRAM RAM Based Utilities 


QRAM is not just another fast RAM disk for the QL. 
QRAM is a set of utilities to get the most out of 
your expansion RAM. 


QRAM includes a dual function RAM disk, a general 
purpose printer buffer, an instant access print 
spooler, resident file system maintenance utilities 
and more besides. All are designed specifically to 
multitask even with the PSION programs. 


QFLP Upgrade 


QJUMP is the foremost supplier of QL floppy disk 
interface software. Upgrade your Sinclair / Micro 
Peripherals disk interface to the standard. 


















































£19.95 






















using ACCESS/Mastercard or cheque with 
order. Please add £1.00 pp (UK) or £2.00 
pp (UK) for ROM version QTK II. 
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“OF COURSE THE man’ PROBLEM IW LIFE IS THE ComeuTeR’ 


hat profound statement: 
“Of course, the main 
problem in life is the 
computer,” was overheard 
on the top deck of a bus and 
summarises many of the evils which 
have been inflicted on _ business 
people in the last 10 years or so. It is 
noteworthy that Sinclair intended to call 
his next computer Pandora and as 
those who have arts rather than science 
backgrounds know, when Pandora’s 
Box was opened all the ills of mankind 
were released. 

It is usually certain, however, that 
when the poor dumb computer is get- 
ting the blame, it is a dumb manager 
who is really responsible. Either the 
manager did insufficient homework be- 
fore buying the equipment, or in- 
adequate thought was given to specify- 
ing the system. Most likely is that the 
equipment and system are satisfactory; 
it is the the management of its day-to- 
day use which Is at fault. 








A team of doctors decided to buy a 
computer to help with the work in their 
office. Having bought the machine and 
tried to decipher the handbook which, 
as we all know, is always much more 
complex than medical text books, they 
very sensibly set to work to change their 
office system to accommodate the 
micro. Having sorted-out their manual 
office system they discovered they did 
not need the computer after alll. 

What a pity they did not consider 
exactly what the machine was capable 
of doing and what they wanted it to do 
before they started. If you are setting 
out on this road, or are at the beginning 
of the journey, here are some pointers 
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from one who has passed this way be- 
fore. After all, why should everyone have 
to make the same silly mistakes which 
| did’? 
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The microcomputer is both a very 
powerful and a very limited tool. It can 
handle large amounts of information, 
sort it, match it and print it out far faster 
than an office junior with a four-drawer 
filing cabinet, a foolscap pad and a pen- 
cil. It can be used to quantify existing 
business, analyse past business and 
anticipate future trends. 

All the same, it is not very good for 
looking-up an individual record or at 
handling complex records with a large 
amount of text which needs constant 
editing. It also takes as long to key-in 
records to the database as it does to 


type them on to paper. 

So you have to consider carefuly how 
you structure records to reduce input 
and how to manage input so that you 
have sufficient time to output some- 
thing. It is very easy to expect far too 
much from one poor little machine. 

A colleague said to me recently: “We 
want to write to 200 or so employers, 
so we thought we would put it on the 
word processor.” | was glad someone 
was awakening to the fact that the 
machines were there to help and | asked 
when it was required. “About Tuesday, 
| would think,” he replied, with no hint 
of sarcasm. 

When | explained it would take at least 
half a day to key-in the information, 
since it had not already been put on the 
database, and that since the daisy- 
wheel printer produces only about 20 
letters an hour it would take 10 hours 
to print his 200, he departed in the direc- 
tion of the Gestetner, mumbling some- 
thing about “wonders of modern 
technology.” 

| was glad that it was the same person 
who had vetoed my buying a 200-cps 
dot matrix machine with NLQ which 
could have done the job in one-third of 
the time. 

There were, therefore, several im- 
portant considerations to be made be- 
fore deciding which office functions are 
worthy of computerisation. 

Precisely what informtion you should 
hold on the computer; what not to hold 
and why; the way in which information 
will flow between manual system and 
the computer; what training you and any 
staff may need; who should be involved 
in reviewing the existing system and de- 
ciding future developments. 

Not all those considerations will apply 
to the one-person business but as soon 
as It becomes a two-person business 
they certainly will. 


Database management 


Unlike a manual system, all inform- 
ation stored on a computer must have 
a useful function so far as the computer 
system is concerned. That means it 
must be capable of being used to calcu- 
late, carry-out searches and sorts on 
data, produce meaningful reports or in- 
teract meaningfully with other computer 
systems. Above all, it must at least save 
you time and probably generate more 
business. 

One big mistake which is commonly 
made is trying to get too much on to 
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the database. That generates so much 
input time that the owner does not have 
a quiet moment to get anything out. You 
must therefore justify your reasons for 
putting up information for every field you 
create. It Is no use having fields of in- 
formation you might need which may 
be called on so rarely that you cannot 
remember the last time you used it. 
They all occupy valuable space on 
disc or Microdrive and, perhaps even 
more important, create unnecessary 
work which has to be paid for. The 
operator either has to waste time input- 
ting data which is not being used or 
waste time skipping through the field to 
one which Is important. Either way, you 


Pay. 





My computer department colleagues 
call me a volatile user, not only because 
| get hot under the collar from time to 
time, but because the data | use is con- 
stantly changing. This kind of data 
makes an ideal subject for a computer, 
since the editing facilities of the machine 
make it easy to keep up-to-date — but 
is does not just sit there and look cheer- 
ful. 

The word processor sets up letters 
which link with the files to communicate 
with people. Sets of data from one file 
are matched with data sets on another 
to print-out lists. Volatility means usabil- 
ity as well as change. Records of past 
transactions,m immutable information 
which is not used interactively with 
other information and other such non- 
volatie data is best kept on old- 
fashioned card indices, in filing cabinets 
or brown paper parcels in the base- 
ment. They certainly have limited appeal 
to a computer system. 
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An office with a system mounted on 
one micro soon discovers it has a built- 
In bottleneck. | call it the ‘funnel effect’, 
since you have several people pouring 
in information but only one person 
operating the machine which will only 
regurgitate its data at the speed of the 
printer in use. 

Because the introduction of the com- 
puter effectively mechanises the office, 
administration becomes more a matter 
of production management. Since the 
machine is doing the procesing, what 
is Now required Is a well-organised as- 
sembly line to ensure that documents 
and information are processed at the 
appropriate time and in the appropriate 
orders. 


Passing paperwork 


It is very frustrating to discover that 
the latest update has been over-written 
by earlier data because no-one 
thought to ensure that documents were 
handled in order. A good computer 
peripheral to use is a battery of filing 
trays. Each process through which a 
document has to pass should be printed 
on a slip — more paper — and ticked as 
it progresses through the system. 

That will ensure that whoever picks 
up a document knows to which stage 
it has been processed. All documents 
waiting for process should be in filing 
trays according to their state of comple- 
tion. It may sound horrendous but if you 
process a large number of documents 
in your business, it is the only way to 
stay sane. 

One of the things | hate most are input 
documents. | cannot see the point of 


oe oO, 6 








having to write things on a special form 
to have information input to a computer. 
| would rather re-design any documents 
| have both to collect the information 
and function as input documentation, If 
it is needed at all. If necessary, it would 
be even more useful to design the com- 
puter input round existing documents 
rather than create work. It seems to me 
that the term paperless office is to the 
computer today what the term wireless 
was to radio 30 years ago. | know | am 
fighting a losing battle — but | fight on. 

Nothing disrupts the flow of input like 
people wanting to use the machine to 
look-up individual records. If you want 
to do that it is usually much easier to 
search a manual system than to find the 
appropriate discs, load the program, 
issue the search command and view 
the record. If you need only to get in- 
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formation from a record, by far the 
easiest way is to have a print-out of the 
files on the desk. 

Many of the pitfalls are avoided when 
the computer is integrated properly into 
an office. They are most prevalent when 
the computer has been tacked on to an 
existing manual system. In general 
terms, an office micro must become 
the hub of the operation. It likes to be 
the centre of attention. Since, if used 
wisely, it will make light of mindless 
chores, leaving you to make money, it 
is better to ensure that all other systems 
relate to it well. 


Peripheral people 


Other systems, of course, includes 
you and any staff you have. Integrating 
the computer with people is much more 
difficult. The problem is that all life forms 
are territorial. They are happiest when 
they Know where. they are and what to 
expect. That is true of plants and ani- 
mals but it is especially true of clerks. It 
is not a pretty sight to see a colleague 
struck with a sudden attack of 
technophobia. 

It usually happens just after the first 
record has been saved to a file. The 
screen clears and the record has van- 
ished from sight; as far as the 
technophobic is concerned, it has prob- 


ably gone for ever. Helping people to 
realise that because they cannot see 
the record any more does not mean 
they have done something wrong 
sometimes needs the patience of Job. 

Even so, by taking colleagues pa- 
tiently step by step through the proces- 
ses, confidence can be inspired. One 
of the best computer input clerks | know 
shook physically when | first introduced 
her to the machine. 





Training others pre-supposes that the 
trainer is prepared adequately. Self-ac- 
tualised business people seldom have 
the patience with themselves which they 


need. Anxiety to get the show on the 
road can encourage skimpy coverage 
of the necessary ground-work and re- 
sult in frustration and even disaster. You 
have to do your homework, getting to 
know what the system can do, so that 
you can specify what you want it to do 
for you. 

Many technical colleges are staging 
courses for business people, both in 


evening and day classes. The national 


Extension College, among others, can 
also provide useful correspondence 
courses on business computing. You 
might find a local QL User Group where 
you can receive help and advice. That 
will lay good foundation material for a 
happy business relationship with your 
computer. 

If your business is dynamic, so will 
your computer system be. That means 
that whereas it is essential to get the 
system as correct as possible at the 
outset, a constant policy of review and 
revision needs to be maintained hence- 
forward if you are to move with the 
times. Once you start on that path you 
will be surprised at what a useful tool a 
well-managed computer can be, but be 
vigilant. Once you lose control the 
machine will begin making demands on 
you. Good management will ensure that 
it pays its rent. Very good management 
could ensure that it pays yours as well. 





DS Enterprises 
(01) 671 0209 


For all your QL needs 


Disks 


SWAS i 
Mimic (Recommended) .... 
3.0" 


DS DD 
£12.50 


Maxell 


All disks are guaranteed and come packed in plastic flip & file type boxes. 


Drives 
QL, Spectrum or BBC Compatable. 


Single 80 Track 
£110.00 


QL Software 


Lattice C 

Pascal (Full ISO) 

Cash Trader 

Lisp 

Super Charger (Basic Compiler) 
Ram Disc (Ram Disk & Utilities 
QLpaint 

Toolkit Il (Eprom version) 

Ice & Choice 

Sign Designer (Designs Screens & Signs) 
Touch Typist 

Integrated Accounts (Sagesoft) 


Add On’s 


512k Expanderam (Miracle Systems) 
Including Ram Disc 
Dual 3.5” Drive & Interface 


Citizen 120D Printer (Including Leads & Quill Install) 


Astrocom Modem (Ex Brightstar) 
Sandy 512k Interface 


All Prices include Vat and Post & Packing (in UK). Phone for full 
price list or quote on other items. 
DS Enterprises, 25 Trinity Rise, London SW2 2QP (01) 671 0209 
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2 metre cable. 


Dual 80 Track 
£210.00 


Datalink U K Payment by cheque or 
99 Constitution Street Visa Card Welcome 
£249.95 Leith Telephone for immediate 


Exclusive Datalink QL Products 
Datalink SPI - QL 


Serial to Parallel Printer Interface 
Plug-In-And-Go design, compatible with 
any Centronics Parallel printers. 


Datalink RS-232 OL Printer Lead 
QL to 25 Way D Plug printer lead, 


Datalink QL Joystick 
Quickshot II Style Joystick, 3 fire buttons 
Plug direct to CTL 1 or 2. 


Datalink QL Joystick Adaptor 
Convert any Atari/Commodore/Spectrum 
joystick to use with QL. 

Plug direct to CTL 1 or 2 via adaptor. 


Prices include Postage, Packing & VAT 
12 months warranty and 14 days money 
back option with all Datalink Products. 


Dealer, Distributor & Export Enquiries welcome. 


Edinburgh, EH6 7AE 
All trademarks acknowledged 








«sg babawneniavascenvonsas ares &19,95 


























dispatch 031-554 6040 
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ABC Elektronic 


Huegelstr.10-—12 4800 Bielefeld 1 Western Germany 
proudly presents the Giga Soft 


VMiouse 


for the SINCLAIR QL  . 


ae eee te 8 8 ee ee 8 ee 6 6 oF ee 8 es eee 





The Giga Soft Mouse comes in a ready-to-use package including a high quality mouse (resolution 
0.01”), an interface for the joystickport of the QL and a software package. 


The software consists of the following programs: 


Giga Was BasIC (Tested in QL USER 1/86 p. 58) 


A totally new type of Basicextension for the SINCLAIR QL. Itadds more than 70 new commands 
to SuperBasic. Features: 








» Full mousecontrol from Superbasic » Programmable function keys. 

» Easily programmable MACINTOSH style » Comfortable texteditor like Basiceditor 
pull down menus. with 20 functions. 

» Very sophisticated spritanimation » Commands to program real windows (with 
commands. background refreshing) 

E a A. S , e 3 The new MACINTOSH style desktop & / 

Easily Applicable System Environment 

» E.A.S.E. is completely mousedriven. » E.A.S.E. has an inbuilt puzzle game. 

» E.A.S.E. supports real pulldownmenus. » E.A.S.E. gives you full I/O control, all 

» E.A.S.E. can work with up to 7 real functions can easily be accessed by using 
windows. _ the mouse. 

» E.A.S.E. has an inbuilt scientific calculator. 9 E-A.S.E. windows can be scrolled and 


moved across the screen. The size of a 
window can be changed by using the 
mouse. 


The price: Europe: 220 German Marks. Overseas: 230 German Marks 
How to Order: 
1. Send acheque to ABC Elektronic 
2. Transfer money to Postscheckamt, Dortmund, Account Mr. Budde Nr. 902 83 469 
3. Send an order to the above address. We will despatch it cash on delivery only for Europe. 
New Giga Soft Software Soon available: 
@ C-Editor the Character Set Editor for to use with Giga Basic 100 DM 
@ Giga Paint a good Copy of Mac Paint for the Macintosh, include converter from Spectrum 
Pictures to QL Format. It will only run with more memory. Please ask for details. 100 DM 


New Giga Soft Hardware soon available: 

Q Sound Interface. With a 3 Channel Sound synthesiser, a lot direct sound commands for 
to use in every program. Further a Centronics Port for to use with a Printer. Please ask for 
more details. 

@ Giga Soft Keyboard: Upgrade your QL in a PC with a new IBM style keyboard with 10 
function keys and a numeric field and a real professional keyboard feel. The new keyboard 
works with a small interface to plug in the QL Expansion Port. It will work with other interfaces 
without problems. Please ask for more details. 
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DUST COVERS 


Qk DUSECoverse. 5 -: aa ean 
SHSSTIUNTI +H iarawe Micha tte 
Amstrad Keyboard 
AMsSiGaGiMoniion,. - 0. cies oe 












Set S/SI6/D) a Be 4 
BV 0/8 D/D- 2: 55... ame eae, 
N Bi S/S S/ Dy a GG ya Ae 
rN BY DS / Dy iia ae 
Z DURADATA PRINTOUT BINDERS 
Zo fo «SBM 12" BY2"-9%H" oe, £2.45p 
, 5556 NN’ Xda” i £2.79p 
e Fully interlocking SASS I IAS B/G ee. £2.99D » 
e Hold 20 cartridges LOCKABLE 






Available in black, blue, green, red & e BROWN TINTED REMOVABLE LID 
yellow. e DIVISIONS & INDEX TABS 


Box + 10 cartridges DB) KY GS) (0) 7. \C7 BO) qs) SPECTRUM RGB INTERFACE 





Bok + 20 caries a es 3" Box (holds 20er RGD Interface (TV/MONITOR 4 
¢ Microdrive storage box is available from 3, BOX {holds 20 disks) ....... $12.29P eteee. i 

3 Box (holds: 40'GISKS)IG...: Gana. . £17.00p 

W.H. Smith, John Menzies and Spectrum. Be 
32" Box (holds 40 disks) ........ £13.25p e Please add £1.00 postage 
MICRODRIVE CARTRIDGES 312" Box (holds: 8U'disks)...:... 5 £17.00p E 
5¥a"" Box (holds 40 disks) ........ £15.75p and packing. 

10 Microdrive cartridges ........ $17.50p 512” Box (holds 80 disks) ........ £19.00p 





‘TRANSFORM LTD. (Dept.QL) 089 283 4783 
Mail order only. Lucks Lane, Paddock Wood, Kent TN12 6QL. Lot 












FULL SCREEN EDITOR. PRINT USING. LAST LINE RECALL. ALTKEY. 
JOB CONTROL. FILE HANDLING. DEFAULT DIRECTORIES. EXTENDED 
NETWORK allows discs, printers etc to be shared between 

QL’S. New broadcast protocol included. Over 118 commands. 

Written by Tony Tebby. Toolkit on 16K EPROM ++ library rack + 
comprehensive manual. SuperTOOLKIT @ 


CHARACTER FONT GENERATOR/EDITOR PLUS the following fonts E13B, OCR 
SUPERSCRIPT, SUBSCRIPT, LARGE AND SMALL ICON FONTS, ANIMATION FONT, UPPER 
& LOWER CASE OLD ENGLISH. for use with toolkit. 


RAM DISC SOFTWARE on microdrive 





JUMp 





















QL CROSS ASSEMBLERS 6502, Z80, 8048 series etc phone for details. 


[SR 

















HAVE YOUR 14” & 16” PHILIPS & PYE 








PHILIPS COLOUR 85 CHARACTERS COLOUR TV CONVERTED TO ATV/MONITOR (=== 
TV/MONITORS PER LINE FACTORY cee 
CONVERSION £80.50a ae 

16” MODEL 16CT2016 £285.90a Inc. VAT pe iceact col © 










REMOTE CONTROL SUPER VALUE 
16” MODEL 16CT2216 £311.65a Inc. VAT 

We can supply up to 26” TV/Monitors— 

please ring for details. * FREE 


LEADS SUPPLIED 
FOR USE WITH QL 


* Resolution better than 585 x 450 pixels. 

* Image clarity comparable to leading monitors. 

* Includes RGB lead for connecting with BBC/QL. 

* Conversions carried out at our workshops within 2/3 days. 
One £10.35c Inc VAT 
Five £34.50c Inc VAT 


Ten 57.50c Inc VAT 















GREEN MODEL BM7502 


















@ £83.95b By Post. Enclose your Cheque/P.O. made payable to CARE Electronics. 
AMBER MODEL BM7522 Or use your ACCESS/VISA. Allow 7 days for delivery. Please add carriage. 
@ £85.10b OPEN: Yam-5pm MON-THUR a)@9.99 c)@1.00 

: 9am-4pm FRI/SAT b) @ 8.00 d)@2.00 





UNIT 14, PEERGLOW INDUSTRIAL ESTATE, OLD’S APPROACH, WATFORD, HERTS. TELEPHONE: 0923 777155 


a HG 








Early last year Sinclair made 
a present of more than 500 
QLs to Strathclyde University. 
Mary Sergeant assesses the 
machine’s progress through 
Britain’s higher education 


establishments. 

hen the Strathclyde 
Project was announ- 
ced by Sinclair Re- 
search in January, 
1985, It was not im- 
mediately obvious that the QL had 
found a niche which no other micro- 
computer then available could fill so 
neatly. The information that a Scottish 
university would like all its students have 
personal computers by the end of the 
decade, and that Sinclair had “gener- 
ously gifted” the first 525 machines to 
that end, sounded more like a public 
relations exercise than a serious market- 
INQ Opportunity. 

Fifteen months later, however, 
Strathclyde is producing results and its 
initiative has spread to several other 
higher education establishments. It is an 
environment which appreciates the 
power arid the sophistication of the QL 
as no other market sector has done. 

The University of Edinburgh, Teeside 
Polytechnic and Leicester Polytechnic 
have all followed the Strathclyde lead, 
with projects ranging from electronic 
chip design to problem-solving and 
word processing. Each of the colleges 
anticipates an expansion of its individual 
schemes and, so far, the advantages of 
extensive use of micros have been 
found to outnumber the disadvantages. 
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The price is right 


IN one sense, the impetus of all the 
tertiary education projects involving the 
QL could as easily be maintained on 
other machines, with a similar specifica- 
tion. The 68000 processor, the 
memory, graphics capability and porta- 
bility are none of them exclusive to the 
Sinclair micro but once price enters the 
calculation, the QL leaves the opposi- 
tion standing. Realistically, students will 
never be in the position of affording, for 
example, an IBM PC, nor even one of 
its many clones, and although Amstrad 
systems are competitive in terms of 
price, they do not offer the same power 
or portability. 

The underlying premise of the 
Strathclyde and other projects is that 
micro-computers can and_ should 
change the way in which subjects are 
taught at the higher levels, and that in- 
dividual students, as well as the particu- 
lar colleges, must have total access to 
the necessary hardware and software 
before the revolution can become effec- 
tive. 

When Strathclyde first went public 
with its plans, the project director, Pro- 
fessor James Alty, was quoted as say- 
ing: “The need is for a workstation — for 


students — capable of some stand- 
alone functions such as local filing, edit- 
ing and program compilation, while at 
the same time capable of linking to the 
campus network for access to higher 
levels of computing.” 


“When the students get 
hold of the machines 
and use them, I think 
most of them find the 
bad publicity was not 
deserved”. 


That has proved to be wholly possible. 
Dr Richard Kingslake, senior lecturer in 
the computer science department, has 
graduates reading for an MSc in inform- 
ation technology who plug their QLs 
regularly into the university’s triple VAX 
11/782 mainframe system and, having 
prepared documents or complex calcu- 
lations on the QL at home, move files 
to and from the mainframe computer, 
very much as their work schedules dic- 
tate. 

All first-year students who read com- 
puter science, whether as amain course 
or a subsidiary subject, have access to 
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a QL and are required to hand in all 
course work ready-printed, courtesy of 
Quill and the various printers available 
on campus. Electronics students have 
used the QL to study circuit design, 
employing simulator software written by 
a member of staff, and tutors and lectur- 
ers often take a QL into the lecture hall 
with them. 

The two areas most concerned with 
the project are the schools of computer 
science and electronic science but 
many other departments are involved 
peripherally. The law department re- 
cently requested 30 micros, mainly for 
use in data storage and manipulation, 
and other faculties use the QL for rela- 
tively straightforward business proce- 
dures such as spreadsheet and word 
processing applications. The business 
school has a laboratory full of QLs and 
the modern languages department is in- 
volved in a somewhat abstruse use of 
micros, investigating the structure of Ita- 
lian poetry. In all, at least half the depart- 
ments in the university are involved to 
some extent and a fair percentage of 
the 7,000 student population is aware 
that the QL has arrived. 


Into the nineties 


Whether the end of the decade, i.e., 
in four years’ time, is a realistic time- 
scale for the aim of ensuring that 
everyone has a personal computer, as 
was Intended originally, is a different 
matter, and whether all the personal 
computers will be QLs is as yet unde- 
termined. : 

Kingslake likes the machine, and so 
do his students. “When the students get 
hold of the machines and use them, | 
think most of them find that the bad 
publicity was not deserved. | use a QL 
all the time and | would say the bad 
publicity was wrong.” 

The university, however, cannot af- 
ford to take chances. Much of the soft- 
ware developed in the last year at 
Strathclyde is not specific to the QL, 
although written on it. Most of the tai- 
lored programming has been restricted 
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to short sub-routines which could easily 
be adapted for use on other micros. 


Although “the QL is certainly one of 
a set of micros we would always con- 
sider,” Kingslake emphasises that the 
university has to take into account the 
possibility that the QL may not always 
be available. “We would not want to be 
in such a state that we were hooked on. 

As for his ideal machine, it should be 
relatively cheap, fairly portable and “it 
would be very pleasant if it could have 
an in-built screen.” As someone with 
experience of the QL with both Micro- 
drives and discs, he finds “Microdrives 
are much slower than discs and one 
tends to change the whole way one is 
working, so | think we would very much 
like it if we could have a computer with 
discs in the future.” Yet Strathclyde is 
pleased with its QLs so far, having ex- 
perienced only a three percent failure 
rate of machines, and only seven faulty 
Microdrive cartridges out of the 1,300 
used to November, 1985. 


Student software 


As for tangible results, Strathclyde 
has produced prot otype software for its 
own and other colleges use, about 
which David Park of Sinclair says: “At 
last, we have software and operating 
procedures which we can sell across 
tertiary education round the world.” 
Apart from the circuit design procedures 
for electronic engineering students, 
there are three major programs which 
may be available commercially before 
the end of the year.” 


The Strathclyde portfolio consists of 
three programs, Filet, Reader and 
Examiner which are likely to be of use 
to students in any discipline at any level. 
Filet was written in machine code and 
is designed to move files fast between 


the QL and a maniframe computer. 


“The mainframe end of it is written 
deliberately to be general and it has a 
little extra frill on the side. We have made 
the QL act as a 4010 Tektronix graphics 


CHALLENGE 


facility, So we can draw pictures on the 
QL running from a program on the main- 
frame. That is not much.use, | must say, 
but it is rather a good little extra.” 

The other two programs permit man- 
ipulation of the text files taken from the 
mainframe by Filet. Reader operates 
much like an editor, except that, as with 
a printed book, the text cannot be moa- 
ified. It can be annotated, as is usually 
done with a pencil in the margins of 
books, and although the main text will 
not be marked, the annotations can be 
Saved and re-loaded when required by 
the student whose notes they are. 

Examiner is again concerned with in- 
teraction between the mainframe and 
the QL, allowing students to take ques- 
tions or assignments from the central 
computer and deal with them on a file 
which is fed back subsequently into the 
mainframe to be accessed by the relev- 
ant tutor. 


“We would not want to 
be in sucha state that we 
were hooked on a 
machine we could not 
replace”. 


STEAM is more particularly com- 
puter-orientated. According to Sinclair 
Research, it stands for Strathclyde 
Teaching Electronic Automatic 
Machine. “Well, it might be,” says Kings- 
lake cautiously. “| invented the word 
STEAM because | thought a steam 
computer sounded fun and it obviously 
has the word Strathclyde on the front. 

An Emulator for assembly and 
Machine code was one possibility but 
we haven't really defined exactly what 
it stands for. No matter, it is a powerful 
tool. It emulates a very simple computer, 
while demonstrating many facilities of 
more advanced computers, and the 
students learn a good deal about com- 
puting by using this emulator.” 
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Students operating S 


Polytechnic projects 


It is that kind of development which 
could help establish the QL as a recog- 
nised micro for higher education. If the 
proper kind of software becomes avail- 
able in quantity, many other colleges 
would be encouraged to look at the 
Sinclair machine. That is very much the 
view of Brian Riches, senior lecturer in 
the school of electronics and electrical 
engineering at Leicester Polytechnic. In- 
terested in the fit reports of the 
Strathclyde Project, he initiated a pro- 
ject at Leicester which he describes as 
“ouny when compared to Strathclyde,” 
but which is nevertheless a clear indica- 
tion of the move towards a radical re- 
thinking of teaching and _ learning 
methods in tertiary colleges. 

Originally, Riches proposed a scheme 
whereby local banks would offer loans 
to prospective electronics students at 
Leicester, so that each entrant could 
arrive equipped with a QL. He still hopes 
that something of the kind can one day 
be achieved but, as a pilot scheme, he 
has approximately 30 QLs with monitors 
on the polytechnic campus. 

They are available to students on his 
courses, both for use in class groups 
as individual workstations for fairly 
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course att 
closely defined exercises. Programming 
in Pascal, word processing and de- 
monstrations of electronic circuit design 
are all part of the pilot scheme, although 
Riches envisages that, ultimately, com- 
puters “could easily have a dramatic ef- 
fect on the way many subjects are 
taught. Many subjects are based on 
mathematics and if some of the 
techniques were to be based on com- 
puters, It could lead to different methods 
of approaching the material.” 


“At last, we have software 
and operating 
procedures which we 
can sell across tertiary 
education round the 
world”. 


His approach is strictly utilitarian. The 
micro can affect teaching methods pro- 
foundly and make available knowledge 
which is not easily explained by more 
traditional methods. “You cannot really 
base your teaching on those techniques 
until the necessary hardware is in place” 
he says. That means the polytechnic 


resources being dedicated to expensive 
equipment, while the QL takes its place 
as the individual micro used by each 
student off campus. He believes that 
problem-solving and self-learning pack- 
ages can and should be pursued by 
students in their own time, in their 
homes, with the polytechnic facilities as 
back-up. 

A similaar philosophy is behind the 
scheme inaugurated at Teeside 
Polytechnic, where computer science 
students work on language programm- 
ing and investigate the design and con- 
struction of computers, courtesy of indi- 
vidual, home-based QLs. Work con- 
tinues on campus with polytechnic QLs 
in the computer science laboratory. Dr. 
Alan Clements, senior lecturer in com- 
puter science, was attracted by the 
68000 processor, which already forms 
the basis of much of the teaching and 
research under way in the States but 
he says that the QL “could scarcely be 
better-suited for the job” of teaching 
students assembly language  pro- 
gramming and computer architecture. 
He hopes to base part of the Higher 
National Diploma in information tech- 
nology on the QL. 


Computer aided degree 


Edinburgh University is using the 
micro in arather more esoteric way. The 
Gateway Project is concerned with 
teaching undergraduates integrated cir- 
cuit design, employing the powerful QL 
graphics capability in a computer-aided 
design exercise which has previously 
been practical only on highly-expensive 
mainframe equioment. The students 
work on individual QLs, using them as 
data-entry workstations with graphical 
inout, and achieve better results than 
with text-only input mainframe com- 
puters. 

At the end of their degree course, 
fledgling electronics engineers have 
participated in a complete cycle of chip 
design, from the drawingboard stage to 
the construction and testing of the 
finished circuit, and while the result is 
not up to industrial specifications, be- 
cause it is a teaching and not a manu- 
facturing exercise, the individual 
graduate leaves Edinburgh with a 
thorough understanding of the theory 
of chip design, courtesy of the QL. 

Clearly, the field of higher education 
is one which is well worth cultivating 
and, as Kingslake says, “Sinclair, 
which is typical of him, got there first 
and filled a hole.” It is a hole which will 
need to be guarded well. In no sense 
are the colleges sales offices for the QL 
and ultimately they will serve the in- 
terests of their students before those of 
a micro manufacturer — but Sinclair has 
sown some healthy seeds. 
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NEV FROM TALENT! 


— a superbly designed 
professionali fool. 

Suitable for: flow charts, electrical designs, 
mechanical drawing, letterheads/logos, 
PERT charts, architectural drawings. 


TECHNIQL is a two-dimensional CAD package suitable for all 
general, scientific and engineering applications. 
It allows the user to create accurate and finely-detailed plans, 
diagrams and designs. These can be printed out to any width 
on Epson or Epson-compatible printers. 
* FAST, multi-width printer output 
* Menu or keyboard driven 
* Pictures can be many times larger than screen 
* Zoom in and out 
* Compressed storage of designs 
Complete library of drawing tools: lines, circles, 
boxes, curves, ellipses, polygons 
Two screen modes 
Relocatable code (compatible with disc, extra RAM) 
Cells can be edited, mirrored, rotated, scaled, 
positioned accurately in other cells 
Grid and grid snap 
* Up to eight layers per design 
* Text can be included 


£49 | * Up to 75 cells can be created = — 
95 Ae P| Available from: 


q TALENT COMPUTER SYSTEMS 
(+ SOp postage §: | TF, N43 - Curran Building, 104 St James Road, 
and packing) f} = =§ COMPUTER SYSTEMS Glasgow G4 ONS. 

+ SOFTWARE FROM SCOTLAND Access & Visa hot-line: 044-552 2428 


QL Price Blitz 


Matchpoint ...........cccceseee EIZ5O — HY POPdhiVG iiss. cicscssecesscsancss TAZ  SNOOKOS cc sciaisscesscguaseaveecies 

AIGHE FHQR ccccccscsstdertecns £1250 Hopper id cnch dea. EVZGO + GUIDES. pce ctSecnet £12.50 

LG Soa e ste5 suds £1250, West «2c. See Et25O WwiGOSINOS’ .......58..0--habontee £12.50 
ee ae, 5 ct an RE, : Super Arcadia ..............0008 
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AE a 5 Mo an Bridge Player .............cccsce00s Craxy Painter ........cccccce 
eT a es ec £11 © Buithe-Returticaisas.acken £O:75 9 Spooks iisest. fac Soe £9.75 
WMGIEON-SUONIN: scccesssscsoncesssseseis ST «HEU ONE Wesccteca s,s cecrecttenctaeees SU) 4 FOVOIS! seria cies Sactes eae £10.50 
BOW SIUGNG tilcieerteccce.cttst.: Mtns GAOL ens scscectsccccthnccs teen necesciel i imag C9 (6): arth a ei £13 
JADDON WIE... 5 .depcdadccstervennchodes EO00) QUDOIMSTLIN IE 11,..400...&0: SMO LEATTIGO Aoi. .ccs thestceendends £11.50 
IGE TOOK. ntins:..cattarn ot CO) = QD UMS ert cere ites..n ons £9: Eagle/Zapperit:..c.ce...0dtcte, £9 
(2: Sp une niae Semen Aik ite E21 © SUD GFN? cccucteeocneasateovuass BO: QU MOD ssssarcccscstvciggrevsearcesnttones £30 
Super Monitor ..............se00 £20 Super-Sprite %......0...c.cccccccsens E20" “ SUPEL FORM siicccloccectoscesecctetes £24 
Super Astrologer ...........c000 £20 Backgammon ................ SIGS: BOundel <ssssiccsccaccsctet £8.50 
Classic Adventures ............. £8.50 Eagle & Zapper ................... SSD: ASSCMBICT. ..1...ksserciose-onstorardack £34 
BOPL Litera iechssccscoreccesss AR il i] ieee ine, Bib leapt i SY RRM TE | gee al elle eee £80 
Eo £90 = Integ. Accounts ..................... £80 Home Finance ...................00. £21 
Gash TRagGitet atti «s.osesescens. £61 Entrepreneur ...............c000. £34 Startrektss sain. skorts £3.50 
WANGOPGT rr etcclee tt cscenraciansnas ST) WOO Sao sscaccuscsbstocraaasiorpoess £17 ICE complete kit..................... £52 
ODE lari ss icsesssssscssasoeepaemnerrene Bre | SPO DISC. Te tenctetecsecssegsetees £23 ~~ AYCHIVES DISC ......cc.s..c0sccs.crece £23 


HACOMIDUTCN: cii.:sBtaieeteeeicua ie sccccciscdecettece £185 EXPAnGOVann OVAK ee. sccei isc ceietecesctocecthactecceessetet £120 
EXDANEGTAM ZOOK: .airiieiscerphichstesessseee cee ylee £90 ClimiandiDisedFy iz. Sears ee LIS) £78 
Disc IF & Single 3Y2” drive ....... cc eceseesecsceseeeees £180 DISC TF GrS/2,, GUA GVO. ta.....cccrecscarssrsccevuiseom £275 
Centronics Printer Interface ..............ccccccesceseeeesees £26 SEV SUONK PAGEISION: oo c2cc2 once cusnvnscstveseonteravedtositaay £4.50 
Quickshot II | a, i, Ae £8 PU CAUE JOVSUCK is sise stoecsscerseeesacctedecctvabsosteteets £14.50 
FTOGOUU JOYSTICK. .. creamer rites ss cosecstnacalee £15.50 Microdrive Cartridges ...............ccceccseseseeseseeees £1.80 
4 Microdrives in wallet ...........:.ccccccseccsseeceeee £8 HISIG OT BSORDE  s0ssclssc tenors caiteresrstssaasascasiuaentes £105 












BARON ROUGE 
Are you really an ace? Sure? Prove it!. .. No abstract aliens, but 
airplanes, balloons, birds and other strange or absurd things flying 
in the sky. . 

The aim of the game is to become the General. Very funny! 20 levels, 
machine code, compatible joystick. 


GWENDOLINE 


is the name of your fiancee, captive in a dungeon of the haunted 
castle. You, the hero, try to discover her; find the keys, eat ham, 



























apples bee (you are human, no?) and run! Beware of the bottles of TV Aerial Splitter adate a a £2.30 EPROM Programmer wasconsccngnengnoseatvessconaaten Oret nets £75 
wine! And what happens when you reach GWENDOLINE? See EPROM Eraser with timer I £22 LX80 Ribbon seneeennesnnnnnnenscnnesusbeuneeahtounteeenee £5 
yourself i eae screens. Very nice graphics, machine code, 3Vin. disc SUM EEIORIOK: ..cscssuscasvndMbceeccuosttecsesssuassves £3 SY/ZIN WSU GISCBUGS. vsciscscssscusissssserssceassoecscounes £4 






QL Advanced User Guide Book .............00000000. £14.50 SOMA CADIS) Seca eel Sede accussdedsctecethtscescsscomecotee £10 
Assorted books at over 60% off 
Also a large range of Disc systems, Printers, Joysticks and all the latest software releases. Phone 
for more details. Note: All joysticks need an adaptor. 
UK: Add 50p postage to orders under £5 
Europe: Deduct 10% from all software. Add £1.50 postage + 40p for each program. Hardware 
prices as above + £1.50 postage. Outside Europe: Add £5 postage. 


MPC Software 
72 Julian Road, West Bridgford, Nottingham NG2 5AN 
Telephone: (0602) 820106 





compatible joystick. 
SAVE £5.00 — Gwendoline with Baron Rouge £30 only 


(Price incl. p&p and English instructions) 
Available by Mail Order. How to order — send your address and (1) An 
Eurocheque to LABOCHROME or (2) Transfer money to Account No. 
000-0146480-10 to LABOCHROME, LIEGE, BELGIUM or (3) An order 
to the address below; we will send the package with post cash on delivery 
(8 days delay). 


LABOCHROME, 173 Rue de Fragnee, B-4000 Liege (Belgium) 


Welcome trade enquiries 
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n the last two months, 
have dealt with a 
portion of Lisp —program- 
ming. Having looked at the 
structure of Lisp and a number of 
the built-in functions, we have also seen 
how to define functions, use conditions, 
and the importance of recursive pro- 
gramming in the language. Neverthe- 
less, that still leaves the major problem 
of how to write Lisp programs. 

In this article, we will be developing a 
relatively small but fairly complex prob- 
lem, showing how to apply the language 
to solve it. 

Lisp is an ideal language for the top- 
down programming technique. When 
using It, the main procedure to solve the 
problem is written, regardless of 
whether the routine which It calls are yet 
ready. Subsequently, the next level of 
routines is written, probably using other 
unwritten code, and so on, until finally 
the bottom level of code is included. 
Ideally, by this time, the programming 
complexity of the lowest level code is 
trivial. 

Now we look at a classic problem, 
Known as the Knight’s Tour. This is 
where a knight, as in chess, is placed 
on to a chess board and has to try to 
cover every square, exactly once, mak- 
ing only legal knight jumps. Starting from 
any square, there is a phenomenal 
number of possible sequences and the 
program we develop finally will take 
ages to search them all. 

Rather than concerning ourselves 
with efficiency, we shall find a working 
program which would find the solution, 
given sufficient time. We can still easily 
test our program by having the knight 
tour boards of fewer than 8 x 8 squares. 
More efficient programs often use a 
similar approach to the back-tracking 
technique which we will develop but 
also include specialised search proce- 
dures to direct the search to likely 
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squares, rather than just picking any 
legal square for the next jump. 

Ths possible knight moves are shown 
in figure one. If we assume that we will 
hold each position as two digits in the 
range one to eight — based on the board 
in figure three — the required offsets for 
each of the possible jumps are shown 
in figure two. We might as well now 
define our basic search data structure. 
It will be a list of eight elements, each 
of which will be a two-element list. Each 
of those elements will, in turn, be an 
X-axis, then Y-axis offset for a Jump. 
Our structure called, say, SEARCH, will 
consequently look something like: 

Ke eT 2p) 2) (2a) (2-1) -2) 1 +2) 
(-2,-1)) 

At this point we must consider how 
Our program will solve the problem. 
Since we are not concerned about effi- 
ciency, the exhaustive trial-and-error 
approach will give uS a new square, 
from which we will pick the first set of 
offsets which produce a legal move. 





That, in turn, gives a further square, 
where we carry-out the same proce- 
dure, and so on until one of two events 
occurs. Either we find that we have co- 
vered all 64 squares, finding a solution 
or have tried all possible moves from the 
SEARCH list and none of them gives a 
legal square which we have not already 
visited. In that case, we remove the last 
square visited from our list and back- 
track to the penultimate square. There 
rather than take the previous offset from 
the SEARCH list, we use the next one 
in sequence. This technique, though 
rather slow,’ eventually will guarantee 
covering all possible routes from any 
given starting square. | 

We can now decide on a simple data 
structure for the entire program. At each 
stage, we have to hold a complete list 
of all squares visited so far, in order. For 
each of those positions in the list, we 
also need to know which of the offsets 
from SEARCH was last used, so that 
during back-tracking we can start from 
the next pair of X and Y offsets, other- 
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wise we will find ourselves in a infinite 
loop. 

The simplest approach is often best, 
so for each position in the main data 
structure let us follow the X and Y co-or- 
dinates of the square with a copy of the 
list SEARCH. Then, whenever we use 
one of the offsets, we will remove it from 
the copy of the list. Our final data struc- 
ture will thus be of the form: 

((Xn Yn (Search-list)) 


(X2 Y2 (search-list)) 
(X1 Y1 (search-list)) ) 
where (X1,Y1) is the starting square. 
Choosing square (1,1) for the start posi- 
tion, we know that our structure should 
begin as: 
(lez Tl 2p ieee) (2 =4) 
(1-2) (1 -2) €2s=\1)) 
Each time we check an offset, the 
new square must be opn the board — 
|.e., both X and Y must be in the range 
one to eight — and it must be a previ- 
ously-unvisited square. So, looking for 
the first jump, the first two offsets ( (-2 
1) and (-1 2) ) both give illegal positions 
and will be removed from this copy of 
the list. The third offset ( (1 2) ) gives a 
legal position — in this case (2 3) — so 
that will create a new structure in the 
list, which should now look like: 
ee (2-1) 1-2) (1 2) (2 Tait 2) 
(1-2) (-2 A jh (Che2nesb rary 
2) ET 22ST) 
If you have followed everything so far, 
you are in a position to write the top-level 
of the routine. It is very simple: 
(DEFUN KTOUR () 
(SETQ SEARCH ((-2 1) (-1 2) (1 2)(2 1) 
(SETQ SOLUTION (LIST (LIST 1 1 
SEARCH)))) 

(LOOP 
(UNTIL (ZEROP SQUARES) 
NO-SOLUTION) 
(SETQ SOLUTION (JUMP SOLUTION) 
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(UNTIL (EQ SQUARES 64) 
(OUTPUT SOLUTION)) )) 

Working through this, SETQ SEARCH 
sets up the offset list, as described pre- 
viously. SETQ SQUARES sets a variable 
which will count the number of squares 
visited — i.e., presently held in our list 
structure — so that we know when we 
finished. SETQ SOLUTION sets up the 
starting structure, as position (1 1) and 
the list SEARCH. We then enter the main 
program loop, in which one of two con- 
ditions will occur: 





(-1+2) (+1 +2) 
(-2 +1) (+2 +1). 
(-2 -1) (+2 -1) 
(-1 -2) (+1 -2) 


(a) The variable SQUARES reaches 
zero, indicating that no solution exists. 
That should never happen but provides 
an exit in case our program tries all pos- 
sible combinations of moves from a 
given start square and back-tracks to an 
empty list. 

(6) After updating our SOLUTION, by 
calling function JUMP, we find that we 
have visited all 64 squares, in which 
case we should OUTPUT the SOLU- 
TION. 

You will notice at this point that we 
have been able to write the main pro- 
gram, even though two of the functions 
used — JUMP and OUTPUT — have not 
been written. We can start amending 
this now. The OUTPUT function must 
traverse the list, printing the co-ordi- 
nates Xn and Yn — in this case, ‘n’ will 
be 64 — then moving on to the next 
co-ordinates, X(n-1) and Y(n-1), until the 
entire list has been printed. 


Quick examination will show that by 
removing the first element of the list, a 
very similar list — just one element smal- 
ler, but with exactly the same structure 
— will result. Therefore, our OUTPUT 
routine can be a simple recursive call. 
That will mean that we print the co-ordi- 
nates, ending with the start square. It 
could easily be changed but does not 
really matter. OUTPUT will finally look 
something like: 

(DEFUN OUTPUT (L) 

(COND ((NULL L) (PRINTC)) 

(T (PRINC LPAR (CAAR L) (CADAR 
L) 

RPAR BLANk) 

(OUTPUT (CDR L))) _ )) 

There are one or two features in this 
with which we have not yet dealt. LPAR, 
RPAR and BLANK are the left paren- 
thesis, right parenthesis, and space, for 
output purposes. PRINTC, on its own, 
merely outputs a carriage return at the 
end of the printout and PRINC is used 
to output the co-ordinates (bracketed), 
without a carriage return. AS you can 
see, having printed the first co-ordinates 
in the list, the (OUTPUT (CDR L)) com- 
mand will do the same thing for every 
element of the list except the first. That 
is why a check has to be made for the 
NULL condition, which will signify the 
end of the printout. 

Now to our other undefined proce- 
dure, JUMP. It has to look at the first — 
i.e., the last generated — position in our 
main structure and decide what to do. 
Two possibilities are: 

(a) There are no more offsets remain- 
ing in the copy of SEARCH. Hence we 
must get rid of this latest position and 
back-track to the previous square. We 
will use a function called ENDSEARCH 
to check for an ampty SEARCH list and 
BACKTRACK to perform the back- 
tracking operation. 

(o) Otherwise we must use the next 
offset to try to make a legal move. That 
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will be done by the function TRYJUMP. 

We will not bother about these three 
new functions yet but we can still write 
the JUMP function, which will be: 
(DEFUN JUMP (L) 

(COND ((ENDSEARCH L) 

(BACKTRACK L)) 

i <TRYJUMP Lj >) 

We can then start writing the func- 
tions for the next level. ENDSEARCH 
has to check for the SEARCH list — 
nearest the front of the main list struc- 
ture — being NULL, i.e., an empty list, 
returning True if this is the case and 
False otherwise. Consequently, EN- 
DSERCH will look like: 

(DEFUN ENDSEARCH (L) 

(NULL (CAR (CDDAR L))) ) 





a-.ooo < 
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lf ENDSEARCH returns the answer 
true, we must back-up to the previous 
square. If you look back to the main 
KTOUR routine, you will see that it is 
merely a matter of JUMP returning the 
truncated structure, which will then be 
assigned to SOLUTION. We must not 
forget to update the variable SQUARES. 
BACKTRACK consequently will look 
like: 

DEFUN BACKTRACK (L) 
(SETQ SQUARES (SUB1 SQUARES)) 
(CDR L) ) 

The new function SUB1 is built into 
the Metacomco Lisp implementation, 
being equivalent to (PLUS 1 SQUARES). 

So far, So good. The only function still 
outstanding is TRYJUMP, which should 
try to add a legal move to the list struc- 
ture. There are two possibilities: 

(a) Using the next set of offsets from 
the latest position in the list gives an 
illegal square, either because it is off the 
board, or because we have already vis- 
ited it. In this case, we must remove the 
offending offsets from the copy of 
SEARCH at the head of the list and re- 
turn this new list to the main program. 
That will be performed by a function cal- 
led TRYNEXT, which we will define 
soon. 

(bo) The offset gives a legal position, 
so a new set of co-ordinates must be 
added to the head of our main list struc- 
ture, together with a complete copy of 
SEARCH, and the variable SQUARES 
should be updated. That can be done 
by a function called ADDSQ. We are 
then in a position to write TRYJUMP: 
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(DEFUN TRYJUMP (L) 
SETQ ROW (PLUS (CAAR L) 
(CAAR (CDDAR L)))) 
SETQ COL (PLUS (CDAR L) 
(CAR (CDAAR (CDDAR L))))) 
(COND ( (LEGAL ROW COL L) 
(ADDSQ ROW COL L)) 

(T (TRYNEXT L)) )) 

As you can see, that sets the variable 
ROW and COL to the possible new 
Square, checks to see whether the new 
square is LEGAL, and calls the approp- 
riate procedure -ADDSQ or TRYNEXT. 
These two functions will be along the 
lines: 

(DEFUN ADDSQ (R C L) 
-(SETQ SQUARES (ADD1 SQUARES)) 
(CONS (LIST R C SEARCH) 
(CDR L)) 

We are now almost finished. The final 
function is LEGAL, which must check 
whether ROW and COL — using R and 
C —are either off the board or previously 
visited. Function OFFBOARD will return 
True if either R or C is outside the range 
one to eight. Function UNVISITED will 
return True if the position (R C) is not 
held anywhere else in the main list struc- 
ture. UNVISITED works by checking 
whether R and C are equivalent to the 
first co-ordinates in the list structure, 
then calling itself recursively to check 
everything but the first co-ordinates in 
the structure. These final functions are: 
(DEFUN LEGAL (R C L) 

(COND ((OFFBOARD R C L) NIL) 

( T (UNVISITED R C L))_ )) 
(DEFUN OFFBOARD (R C L) 

(COND ((OR (LESSP eT) 
(LESSP’. © 1) 
(GREATERP R 8) 
(GREATERP C —)) T) 
(T NIL) )) 


(DEFUN UNVISITED (R C L) 
(COND ((NULL LL) T) 
((AND (EQ R (CAAR L)) 
(EQ C (CADAR L))) NIL) 

(T (UNVISITED RC (CDR L))) _ )) 

Everything is now complete and the 
entire program is written. It is shown in 
a more concise form in figure four. To 
be of any practical use, the program 
needs a built-in heuristic which will di- 
rect the search to likely squares, other- 
wise there are a theoretical 8°° possible 
solutions. Obviously there is likely to be 
more than one solution from any given 
starting square and many of the options 
will be discounted immediately by the 
OFFBOARD check, but that still leaves 
a formidable number of combinations 
and you cannot really expect Lisp to 
solve it this side of Christmas. 

In the final article next month, we will 
deal with one or two more features of 
the language and look at _ the 
Metacomco implementation of the 
language, showing what you get for 
your money. 


Figure 4. 
(DEFUN KTOUR () 


( 

(SETQ SOLUTION (LIST (LIST 

1 1 SEARCH))) 

(LOOP 
(UNTIL (ZEROP SQUARES) 
'NO-SOLUTION) 

(SETQ SOLUTION 

(JUMP. SOLUTION) 

(UNTIL (EQ SQUARES 64) 

(OUTPUT SOLUTION))_ )) 
(DEFUN OUTPUT (L) 

(COND ((NULL L) (PRINTC)) 
(T (PRINC LPAR (CAAR L) 
CADAR L) RPAR BLANK) 

(OUTPUT (CDR L))) _ )) 


(DEFUN JUMP (L) 
(COND ((ENDSEARCH L) 
(BACKTRACK L)) 
(TRYJUMP L))_)) 


(DEFUN ENDSEARCH (L) 
(NULL (CAR (CDDAR L)))_ ) 


DEFUN TRYJUMP (L) 
(SETQ ROW (PLUS (CAAR L) 
(CAAAR (CDDAR L)))) 
(SETQ COL (PLUS (CDAR L) 
( 
( 


CAR (CDAAR (CDDAR L))))) 
COND ((LEGAL ROW COL L) 
(ADDSQ ROW COL L)) 

(T (TRYNEXT L)) 


(DEFUN LEGAL (R C L) 
(COND ((OFFBOARD R C L) NIL) 
(T (UNVISITED RC L))_ )) 


(DEFUN OFFBOARD (R C L) 
(COND ((OR (LESSP R 1) (LESSP C 1) 
(GREATERP R 8) (GREATERP C 8)) T) 
( T NIL) )) 


(DEFUN UNVISITED (R C L) 
(COND ((NULL L) 7) 
(AND (EQ R (CAAR L)) 
(EQ C (CADAR L))) NIL) 
(T (UNVISITED R C (CDR L)))_ )) 


(DEFUN TRYNEXT (L) 
(CONS (LIST (CAAR L) 
(CADAR L) 
(CDAR (CDDAR L))) 
(CDR L)) 


(DEFUN ADDSQ (R C L) 
(SETQ SQUARES (ADD1 SQUARES) 
(CONS (LIST R C SEARCH) 
(TRYNEXT L)) ) 


(DEFUN BACKTRACK (L) 
(SETQ SQUARES (SUB1 SQUARES) 
(CDR L) ) 
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SIMULATION 


problem — the screen. 


t may seem ridiculous to want to 
turn your powerful QL micro into a 
humble Spectrum but it must be 
admitted that the Spectrum has a 
vast market of software available 





FIG 1. 


SCREEN 





for it, some of very high quality. Convert- 
ing commercial programs is obviously 
a task of its own and well beyond the 
scope of any article. Nevertheless, there 
is a multitude of program books and 
magazine listings for the Spectrum 
which are just waiting to be converted. 

In QL User, December, 1985, Basic 
Differences delved into the coding prob- 
lems you were likely to meet when con- 
verting Spectrum Basic into Super- 
Basic, including the mathematical func- 
tions, strings and string functions, 
logical operators, control structures, 
data and file handling, I/O and graphics 
It was mentioned that the major stumbl- 
ing-block would almost certainly be the 
screen display. 


Squeezing the screen 


It is a sad point but the fact is that 
40 


Getting your QL to behave like a Spectrum seems like 
an odd idea, but there is an abundance of Spectrum 
software which, with a little coercion, the QL can be 
persuaded to run. Marcus Jeffery overcomes the major 


the QL 32K screen memory finds it very 
difficult to simulate the Spectrum 6K 
screen and 768-byte Attribute file. The 
QL screen Is far more versatile but how- 
ever you try to arrange matters, the 
Spectrum screen refuses to fit properly. 


FIG 2. 


CHANNEL #0 





Figure one shows the character lay- 
out of the Spectrum display, which is 
divided into 24 lines of 32 characters 
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each. In a similar way to the QL TV 
mode, the output and graphics channel 
(channel #1) and the program listing 
channel (channel #2) are both overlaid 
in the top 22 lines of the display and the. 
command and error channel (channel 
#0) uses the bottom two lines, giving a 
display in the form shown in figure two. 

Although printing to (channel #0) will 
display in the bottom two lines, the other 
two channels are not distinguished and 
are merely the output area. In addition 
you will also note that the Spectrum has 
a surrounding border area. That, as with 
the rest of the display, can be set to any 
of eight colours. In fact, a command 
called BRIGHT will allow you to set the 
intensity of any colour on the display, 
giving a theoretical 16 colours, though 
half of them are merely dirty-looking re- 
semblances of the others. 

Moving to our QL screen simulation, 
one decision has already been made for 
us — we need eight-colour mode. 
Choosing ‘MODE 8’ will give 256 dou- 
ble-width pixels along the horizontal axis 
and 256 normal-width pixels on the ver- 
tical axis. Unlike the QL, Spectrum 
characters, as with most other micros, 
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are held in an 8 x 8 array of pixels. If we 
try to simulate this, we find that we need 
(82 characters) x (8 pixels) across the 
display. That gives 256 pixels. How con- 
venient. No, I’m afraid it is not. That pro- 
duces a number of problems. We could 
easily live with the no border area but 
we could not ignore the display dis- 
appearing over the edges of most TV 
screens. You see, in TV mode, your QL 
uses only the central portion of the dis- 
play. You can easily check this on a TV 
by powering-up the QL in Monitor Mode 
and just start typing. You will have typed 
a number of characters before they start 
appearing in the bottom left of the 
screen. In addition, the Spectrum pixels 
are square — unlike our double-width 
mode 8 pixels — so to get a reasonable 
display we would have to use twice as 
many vertical pixels as the Spectrum. 
Unfortunately, 2 x (24 lines) x (8 pixels) 
gives 384 pixels, which is rather more 
than the 256 available. 

The alternative option is to use four- 
colour mode. That would easily allow us 
to fit the Spectrum screen on to the QL 
display, including plenty of room for the 
border area. We would also be able to 
re-write the QL print routines to simulate 
the Spectrum, implement Spectrum- 
like User-Defined Graphics, re-write The 
colour commands to work on character 
areas, and so on. We would still have 


HG 3. 


1000 DEFine PROCedure Spectrum 
1010 LOCal ks 
1020 MODE 8 
1030 WINDOW#O, 384, 20, 64,228 
1940 PAPER#0O. 7: INK#0, 0: CLS#0 
1050 WINDOW#1, 384, 220,64,8 
1060 PAPER#1,7: INK#1, 0: CLS#1 
1070 WINDOW#2, 384,220,64,8 
1080 PAPER#2,7: INK#2, 0: CLS#2 
1090 OPEN#U, SER1 
1100 OPEN#5, scr_512x256a0x0 
1110 SBORDER 7 
1120 PRINT#O, 1982 Sinclair 
Research Ltd" 
Kk$=""" 
REPeat wait 
KS=INKEYS 
IF k$8<>"" THEN EXIT wait 
1170 END REPeat wait 
1180 CLS#0 
| 1190 END DEFine Spectrum 
1200 : : 
1210 DEFine PROCedure SBORDER (col) 
1220 BLOCK#5,504,8.,4,0,col 
1230 BLOCK#5, 504,8,4,248,col 
1240 BLOCK#5,60,256,4,0,col 
1250 BLOCK#5,. 60, 256.,448,0,col 
1260 END DEFine SBORDER 


1130 
1140 
1150 
1160 





the problem of limited colours but by 
choosing the games we want to convert 
carefully, we can minimise this incon- 
venience. 





The only remaining option is to retain 
the QL character fount — why Sinclair 
could not use ‘font’ like everyone else, 
| will never Know — based on six double- 
width pixels by 10 vertical pixels, and 
implement the 24 line by 32 column dis- 
play. That means we cannot simulate 
User-Defined Graphics and the scale of 
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graphics commands will be incorrect, 
but it gives us an_ eight-colour, 
Spectrum-like display. 

‘Using this method, we can also show 
a border, as on the Spectrum, but the 
standard QL BORDER command will 
not work. That is because this com- 
mand works on separate wiondows and 
with the Spectrum window layout — fig- 
ure two — this would either mean the 
window becoming effectively smaller 
and the input channel being separated 
from the other two, or that the two bor- 
ders would overlap. Instead, figure three 
which sets up the Spectrum screen, in- 
cludes an SBORDER — Spectrum BOR- 
DER — command which will draw a bor- 
der round all the windows, as a combi- 
nation of four blocks. If you type-in the 
listing from figure three, then add the 


FIG 5. 


2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
2180 


DEFine PROCedure SCOPY 
LOCal -deodie Kets D¥( 4) 
b%*(1) 192 
b%¥(2) 48g 
b%¥(3) 42 
b%( 4) 3 


FOR i=0O TO 239 
FOR j=0 TO 47 


FOR 1l=1 TO 4 


ELSE 


END IF 
END FOR 1 
END FOR j 
2190 PRINT#4 
2200 END FOR i 
2210 END DEFine SCOPY 





line 10 Spectrum you should obtain a 


Spectrum-like initialisation screen. Line: 


1120 adds the finishing touch with the 
Sinclair copyright message. It might 
even convince someone that you had a 
Spectrum inside your QL, though your 


FIG 6. 


2000 Define the procedure. 
2010 Set Local variables. 


K=132112+128*1+2*j 


reasons for wanting to do that would 
be dubious. Pressing any key at that 
point will give you a flashing cursor in 
the lower display area. 





Sending output to the printer is done 
on the Spectrum by means of the 
LPRINT and LLIST commanas, for print- 
ing and program listing respectively. On 
the QL, the initialisation sets up channel 
four as the SER1 output device, so 
hardcopy output is achieved by PRINT 
#4 and LIST#4. A further feature, avail- 
able on the Spectrum — figure four — 
is the COPY command. It will dump the 
entire screen contents, including the 
two lower input lines, to the printer. It is 
avery useful feature which the QL lacks. 


PRINT#4, CHR$(27); CHR$(65); CHR$(1) 


PRINT#4, CHR$(27); CHR$(75); CHR$(128); CHRS$(1); 


IF (PEEK(k)&&b%(1))+(PEEK(k+1)&&b%(1))=0 THEN 
PRINT#4, CHR$(0); CHR$(0); 


PRINT#4. CHR$(128); CHR$(128); 


The code in figure five gives a Super- 
Basic version of this command. It was 
written originally for use on a Taxan 
Kaga printer but should work equally 
well on any Epson-compatible printer. 
If you wold like to modify the program 


2020 The b% array is used to store the appropriate colour bits. 


2030 
2040 

first 
2050 
~206C 
2070 
2080 
|» 2090 
2100 


the screen display. 
and second 


Calculate word-location. 


Spectrum screen. 


2110 
2120 
2130 
2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 


Check pixel. IF zero, 


ENDIF. 
End of four-pixel loop. 


End of printing 
End procedure definition. 





for the four pixels which are found in each word in 
So, 


b%(1)} ANDED the 


byte will show whether the pixel is set. 
Set single dot paper feed. 
Loop through 239 lines(24 character lines,each 10 pixels) 
Print single-density graphic codes for 384 pixels. 
Loop through 48 horizontal screen words. 
132112 is the start 


of our 


Each word contains four double-width pixels. 
THEN 

Print two horizontal 
ELSE 

Print two horizontal 


End of horizontal print row. 
Move to next dot row of printer. 


for use on other printer types, figure six 
gives details of the variables and how 
the program works. Written in Super- 
Basic, this screen dump program is 
obviously very slow and will take some 
time to dump the entire screen. A better 
option would be to acquire one of the 
many commercially-available screen 
dump programs. 

Figure four shows the other Spectrum 
I/O commands and their QL equivalents. 
In many cases, the Spectrum com- 
mands will be found embedded inside 
PRINT statements, such as: 

PRINT AT 4,4; “SINCLAIR QL WORLD” 

When converting this to the QL, the 
AT statement should be placed before 
the PRINT, as in: 

AT 4,4: PRINT “SINCLAIR QL WORLD” 

With many of the other commands, 
you will notice that the QL format gives 
the option of specifying a channel. Since 
we have overlapped channels one and 
two, many of those commands should 
apply to both simultaneously. For in- 
stance, if you ran the following 
spectrum program: 

10 PAPER 3 

20 PRINT “Hello” 

30 LIST 
both the output (Hello) and the pro- 
gram listing could be shown on a 
magenta background. On the QL, how- 
ever, the PAPER command would apply 
only to the output channel. Normally, 
that would not matter, because when 
running a program, you are unlikely to 
require mixed output and listings. If it 
proves to be troublesome, the best 
method is to write a series of simpie 
procedures to simulate the Spectrum 
output commands. An example is 
shown for the PAPER command in 
figure seven. 


FIG 7. 


~ DEFine FROCedure SPAPER 
(EGIL? 


PAPER#1,col 
PAPER#2, col 
END DEFine SPAPER 


Another command which is not im- 
plemented on the QL is INVERSE. The 
command ‘INVERSE 0’ inverts the col- 


FIG 8&. 
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ours of all texty printed, until the ‘IN- 
VERSE 0’ command is given. The 
easiest way to implement this on the QL 
is to hold the current ink and paper col- 
ours as global variables, changing them 
for INVERSE printing, then restoring 
them when the ‘INVERSE 0’ command 
is reached. 





Spectrum graphics are based on the 
pixel co-ordinates of the Spectrum dis- 
play. This is 256 x 176, giving the display 
shown in figure eight; the bottom two 
lines are ignored in this system. Unfortu- 
nately, we have not been able to use 
the ideal pixel-to-pixel conversion, so 
our QL display is 384 x 220 pixels, with 
each of the horizontal pixels being dou- 
ble-width. Further, the QL SCALE com- 
mand is not versatile enough to enable 
us to define the correct multipliers for 
both axes. This command allows you 
to set only one axis and adjusts the other 
accordingly 

There is no foolproof method of avoid- 
ing this pixel problem. The best com- 
promise is to adjust the X and Y co-or- 
dinates to fit as well as possible on to 
the QL screen, writing a series of proce- 
dures to simulate the Spectrum graphic 
commands. A few of them are shown 
in figure nine. 


FIG 9. 


3000 DEFine PROCedure SPLOT (x.y) 

3010 POINT INT(1.5*x+.5),INT(1.25*y+.5) 
3020 END DEFine SPLOT 

3030 : 


3040 DEFine PROCedure SDRAW (dx. dy) 
3050 LINE_R TO'INT(1.5*x+.5),INT(1.25%y+. 5) 
3060 END DEFine SDRAW 


One Spectrum command is impossi- 
ble to simulate with our present system. 
This is: 

‘ATTR line, col’ 

which returns the Attribute of the 
character square at the co-ordinates 
given. The attribute is a number in the 
range O to 255, where the lowest three 
bits give the ink colour, the next three 
bits give the paper colour, the next bit 
gives the brightness —on/off — and the 
next bit gives the flashing state — on/off. 
The Spectrum is able to do this because 
it holds a separate attribute file contain- 
ing the relevant information. 

We could try to find what we want by 
PEEKing the appropriate bits in our QL 
screen character square but that still 
would not be sufficient. Not only would 
we have no idea which was the paper 
colour and which was the ink colour — 
it all depends which character we 
printed — but, given our present system, 
we could find more than two colours 
within the character area; that is impos- 
sible on the Spectrum, other than by 
using extremely complex interrupt 
techniques. 





Another approach to the Attribute sc- 
reen problem is to hold a separate attri- 
bute screen of your own. That should 
be done in memory, using RESPR, since 
it will contain only numbers in the range 
O to 225, but an easier method from 
SuperBasic would be to use an array: 
a%(21,31) 

Initially, set all these values to seven 
but whenever a character is printed, up- 
date the relevant line — O to 21 — and 
column —0 to 31 — value in the a% array. 
This value should be of the form: 

1 * Paper colour (0 to 7) 

+ 8 * Ink colour (0 to 7) 

+ 128 * Flashing (0 or 1) 

(The BRIGHTness function is not im- 
plemented) 

To simulate the Spectrum ATTR com- 
mand all you need do is read the relev- 
ant array element. To do that success- 
fully, you will need to write your own 
PRINT procedure. It would’ work in 
much the same way as the normal 
PRINT command, calling PRINT re- 
peatedly to perform the output. In addi- 
tion, the procedure would always have 
access to the current line and column 
— as global variables — and would up- 
date them as each character is printed, 
setting the appropriate a% array ele- 
ment and updating the line and column 
positions — column would obviously go 
from 31 to zero, if printing continued 
over more than one line. Bear in mind 
also that scrolling the screen would 
mean scrolling all the values in the attri- 
bute array, with code similar to: 

100 FOR i = 0 TO 20 
110 FOR j = 0T0O 31 
120 a% (i,j) + a% (i+1,)) 
130 END FOR j 

140 END FOR! 





It can be disconcerting to see how 
difficult it is to produce some effects on 
the QL which are relatively easy on the 
lesser micro. That is not so much be- 
cause of the relative powers of the two 
machines but the different methods they 
use. 

~The majority of Spectrum programs 
could be written in only four colours and 
many of the programs you will en- 
counter have only that number. If that 
is the case, we obviously can use the 
QL in four-colour mode. Consequently, 
we are able to perform a one-to-one 
mapping of the Spectrum 8 x 8 charac- 
ter grids on to the QL screen, re-define 
the character fount, including a special 
print routine for the new size cells. That 
would also allow the implementation of 
the Spectrum User-Defined Graphics, 
POINT and ATTR commands, and so 
on. We will be looking at this possibility 
next month. 


Sinclair/QL World June 1986 


=e CREDIT CARD HOTLINE 
rs 0708 851099 








Q+ DISK SYSTEMS 


<SYSrEMS G&G SOFTWARE 








Eidersoft and PCML are pleased to announce a new range of superior disk 
systems based on PCML/NEC hardware and a package of Eidersoft software. The 


ADMINISTRATION ON LY 0708 852647 systems are aimed at tha professional QL user who requires stylish looks, a high 


degree of reliability and co-ordinated icon software and mouse. 


A distinctive feature of the package is the inclusion of the new Eidersoft QL 
Mouse with co-ordinated software and the new NEC CMOS third height 3.5” disk 


drives, which run much quieter, cooler and more reliably than most 3.5” drives. The 
Q [ Mi O U S c disk systems are completely QL style and colour co-ordinated in black (including: 
leads). 


There are two systems available, which are fully upgradable. The Q+Disk 
System consists of a standard PCML disk interface (with built in toolkit commands) 








Eidersoft are pleased to complete with twin 3.5” third height NEC disk drives, QL Mouse and the Eidersoft 
j ftw ackage, which consists of ICE, a disk database, a jotter notepad, various 
ANNOUNCE ag SUPerOr QL obRNGEion Brora aia printer pea a disk. The vesutive Syston is 
Mouse with full supporting identical but has a 256k Ram disk interface and the oe mulitoskine aivore: A 
j module is available to expand the Executive System to the full 64 am. Bo 
sen eae eater: one complete with a bound Repeal covering disk, mouse and software 
: operation. 
mice mouse in beautiful QL 
; , Q+DISK SYSTEM £399-00° Special introductory offer only £375 + £9 P&P 
black, comes complete with ICE in ROM and Disk interface without memory (upgradable) + 2x3.5” NEC disk drive + ICE + 
the ARTice mouse graphics program. The Mouse + added special utility software. 
mouse is interfaced via the ROM cartridge Be ee eee ea) OaUE Lary GIORRDNY EAS -E20RRP ic | 
port, which gives a very smooth and fast Edtod tee uilfeeoe eS Sein en nee 


response that will not be outrun. Mouse control 
is implemented on all packages that use the 
ICE system. 


“EXECUTIVE UPGRADE TO FULL 640K £95 





MICE complete. .........:cssccccen £89.95 + $2.00 P&P IMPORTANT NOTICE 
MICE exchange ICE ROM. siisesse: £69.95 1 £2.00 P&P The recent announcement of the take over of the Sinclair name and marketing 
ICE *& & & & & Sinclair user ClaSSIC ......ccccccceccccceseeees £94.95 rights by Amstrad may have caused some concern to QL owners. Don’t panic. 
CHOICE The multitasking Editor .....cccccccccsccccsecseeees £14.95 EIDERSOFT REGISTRATION 
Eid ft pled rt of QL o\ th h 1986/87, T k that 

ARTICE The ICE Graphics DEICKE GS sn sserGiacunsoesnivns £4 2.95 aeintonied of fecunt deverearicchs ana ney, products soncinineraeibon 3 
ICE TOOLKIT Allows you to use ICE below. 

facilities in your own programs (inc. mouse) ......:.... £40.95 












QL GAMES 
KARATE | £14.95 


M P A G: C; T The best QL game we have seen, 


SPOOK * * & & & £10.95 
INTEGRATED PN SO ile “The game, however old the idea is, is probably the best version of Pacman for any 


micro computer.” PCW February 1986. 


BJ IN 3D LAND £12.95 
BJ IS LOST AGAIN! THIS TIME IN A 3D MAZE THAT WILL POSE A CHALLENGE TO ALL (OVER 
70 SCREENS) 


BJ THE RETURN £10.95 


“As an improvement on the original, BJ The Return can only do well...” Sinclair QL 
World March 1986. 


CITADEL £9.95 


Unravel secrets of a giant city as you steer your craft through over 50 screens of 
danger and excitement, 


ZAPPER WITH EAGLE £9.95 


Two great machine code QL games for the price of one! Zapper the snappy arcade 
game is now joined by defender style Eagle. 


JOYSTICKS 
Sureshot QL £19.95 + $1.50 P&P 


Quickshot QL £412.95 + $4.50 P&P 
Atari/QL Lead £5.49 + £41.50 P&P 

































IMPACCT is the only truly integrated accounting system that gives you all of the 
_ features that ledgers on other business micros can ata third of the cost. 


IMPACCT ACCOUNTING (Originally developed on mini computers!) Allows your QL 
to drive your business in the way you would wish. IMPACCT gives you the facility to 
produce invoices, statements, keep an eye on your debtors and creditors, keep 
track of stock, produce a large variety of business reports and much more. 
IMPACCT is suitable for traders, limited companies and partnerships and has been 
fully checked by accountants. 


IMPACCT ACCOUNTING is flexible. You can set up your accounts in a variety of 
ways with full choice of account headings and names, IMPACCT is modular. You 
can start with any of the four modules and build up later to a fully integrated 
system. 


IMPACCT ACCOUNTING is multi-tasking! Using expanded memory and CHOice 
software IMPACCT will multitask with other applications (e.g. QUILL). 


IMPACCT ACCOUNTING is data compatible with the PSION programs! An export 
module allows you to export reports to QUILL, ABACUS and EASEL!! 


IMPACCT IS EASY TO LEARN and comes with a full user guide. Telephone support is 
available for a small fee and training courses are being organised monthly for 
very reasonable rates. 


IMPACCT ACCOUNTS 


£49.95 Each Module 
£139.95 Sales / Purchase / Nominal 
£179.95 Sales / Purchase / Nominal / Stock AVAILABLE NOW!! 
£49.95 Sales Order Processing 
£49.95 Purchase Order Processing (June 86) 




































ih 















£89.95 Upgrade kit for those accounting packages that cannot give you a 


printed invoice .. . invoicing and stock control. . . 









SPECIAL PRICES FOR EIDERSOFT DISK SYSTEM 
~ CUSTOMERS | 







QL Computer Repairs and support. 


UT Bh ial-Mereltlelelsme)e)ele.s)(- Mie) mil iuin-lme(-1(01| <9 





DELIVERY: at items ‘st CLASS POST FREE UNLESS STATED OTHERWISE 






Prices are subject to alteration without prior notice. 








Baron Rouge is the first of 
two new releases from 
Belgian software house 
Labochrome, which, to the 
best of my knowledge has 
not produced anything else 
for tae’OL. 

As a début product I am 
pleased to say that it is very 
impressive. While the 
program boots up you are 
presented with a simple but 
effective cartoon-style 
introductory screen which 
really sets the style for what 
follows. 

The game is probably best 
described as a lateral version 
of Space Invaders. You 
control the Red Baron in his 
biplane, moving him up and 
down the left-hand side of 
the screen. Assorted aliens 
make their entrance stage 
left and move towards you 
in a threatening manner. 
Your job, predictably 
enough, is to shoot them 
down before they crash into 
you and deprive you of one 
of your five lives. 

A fairly boring and 
predictable format, you 
might think, but what really 
makes the game is the 
quality of the graphics and 
the imagination which has 
gone into producing them. 
Hang-glider pilots, fish on 
skateboards, winged horses, 
parakeets, electric eels, and 
other nasties — 20 in all—are 
depicted in superb cartoon 
graphics. 

The only criticism to be 
made is that the gameplay is 
a little on the simple side. 
Apart from that one fault the 
game has much to 
recommend it. 





This is the second 
Labochrome offering for the 
QL in every sense of the 
word. ‘Inserez la cartouche 
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Attack of the Pink Elephants. 


mére dans le mdv2 et 
appayez sur la bar 
d’espacement’ we are 
informed. By the time you 
read this, fully translated 
versions should be available 
so you will probably not find 
it necessary, as I did, to dig 
into the French dictionary. 
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Gwendolyn. Jet-set willy 400. 


It used to be said of games 
like this — much to the 
disdain of the authors — yet 
another version of Jet Set 
Willy. In other words a 
platform type game in which 
the object is to travel 
through various rooms 
collecting certain essential 
objects from particularly 
inaccessable locations. 





The storyline in this one 
is that your fiancée, 
Gwendoline, is being held 
captive in a dungeon. You 
must reach her by running 
along the platforms, up and 
down ladders and jumping 
over ghouls and gremlins. 
To complicate matters a little 
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you have to pick up a light 
snack every now and then to 
avoid running out of energy. 
Certain doors also require 
keys to unlock them before 
further progress can be 
made. 

Gwendoline is a perfectly 
adequate rendition ofan old 
and successful theme and 
the graphics are well up to 





standard. So why am I less 
than impressed? Probably 
for the simple reason that I 
did not find it much fun to 
play. The rooms are 
cramped and 
unimaginatively designed, 
probably as a result of being 
squeezed into two-thirds of 
the screen width. Why that 
has been done is anybody’s 
guess. The information 
provided in the remaining 
third — energy and lives 
remaining — could easily 
have been fitted in 
elsewhere. In all a bit of a 
dissappointment after Baron 
Rouge. 

Baron Rouge S&l7 
Gwendoline £18 
Labochrome 

78 Rue Saint Gilles 

Liege 

Belgium 





Described by the 
producers as ‘designed to fit 
into the market between 
Chess and Space Invaders’; 
Squadrons is a strategy game 
which places you in control 
of Britain’s wartime air 
defences. 

The action takes place 
over the south-east coast and 
the Channel, represented by 
a plotting map complete 
with cities and airfields. 
Events occur at five times 
‘normal’ speed, hence it 
does not take long for the 
first enemy squadrons to 
appear over the Channel. 

Your job is to scramble 
fighters from British 
airfields and plot courses to 
intercept the incoming 
enemy. Should any of them 
manage to penetrate your 
first line of defence you must 
sound the air raid warnings 
and alert the anti-aircraft 
batteries. 

In addition to the plotting 
map, which indicates the 
positions of both your own 
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Squadrons. Cabbage crates over the briny. 


and enemy forces, status 
tables can be selected using 
the function keys. They give 
details of all your operational 
squadrons such as height, 
number of fighters, base 
airfield, time of take-off and 
course. The same 
information is provided on 
the enemy. A fourth screen 
provides a complete 
Statistical breakdown of 
losses on both sides, 
number of standby aircraft, 
airfield status and 
operational radar. 

With any game of this kind 
the secret is to keep your eye 
on a dozen things at one 
time and anticipate what will 
happen, in the vain hope of 
averting a disaster of 
catastophic proportions. 
.[The game is extremely well 
written in that it caters for 
everything down to the most 
minor detail. I was at a loss 
to understand why one of 
my squadrons could not see 
the airfield when I instructed 
it to land. It then occurred 
to me that it would be 
difficult to see anything, 
other than cloud, at 23 ,00Oft. 

When the battle is 
concluded, or you decide to 
quit, your effort is assessed 
by none other than the 
Group Captain. Despite 
leaving half of London and 
the Home Counties under a 
pile of rubble, for which I 
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was duly reprimanded, I 
enjoyed the experience. 
Squadrons 

Peakcrown Ltd 

4 Beeby Road 

Scraptoft 

Leicestershire 

LE? 9SG 


Rarely have I encountered 
a game so aptly described by 


the title. You control a blob 
by means of the cursor keys 
or joystick. This particular 
blob is distinguished from 
the other blobs on the 
screen by the fact that it has 

a chevron on it—the others 
have crosses. 

If you have not already 
guessed, you must shoot the 
other blobs because if they 
bump into your blob you 
lose a life. The 


Blobz. Yours is the one with the chevrons. 
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accompanying literature 
contains all the usual stuff 
about firing ‘high pressure 
jets of antibodies’ and being 
‘transported to another part 
of the galaxy’ but with such 
a basic game it is really not 
worth bothering. There are 
some red blocks dotted 
round the screen which you 
can use for cover. They were 
apparently left behind by a 
previous civilisation. No 
doubt they left for better 
things. 

Blobz &5 

Smiling Software 

26 Dale Road 

Stockport 

SK6 6HA 


The Dark Caverns 


You have no magic pover 
There is nobody here to use any magic on 


In search of The Elixir of Life. 


- Dragonhold — 


‘Deep in the land of the 
Hidden Kingdoms, guarded 
by a vicious and evil dragon, 
can be found the Elixir of 
Life. It is your task in this 
animated arcade adventure 
to discover it. The action 
takes place on a four-way 
scrolling panorama which 
depicts the labyrinthine 
landscape as your little man 
makes his way through it. 

As well as the animated 
display, there are six 
subsidiary windows which 
provide information on the 
current state of play. Among 
other things they display 
objects in your possession, a 
list of your attributes — 
strength, charisma, intellect 
— as well as those of any 
creatures close by. Any text 
messages and conversations 
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with creatures are displayed 
in a sort of command 
window at the bottom of the 
screen. 

As with any adventure 
there are clues to be solved 
and the approach is very 
much one of try it and see 
what happens. This 
invariably ends with your 
untimely demise but there is 
only one way to learn. 
Initially I tried the friendly 
approach, conversing with 
each creature I encountered. 
That produced various 
responses. The goblin 
cackles horribly and the 
dwarf laughs at you. More 
usefully, the woman tells 


— ICHARISHA 

A INTELLECT 
STRENGTH 
Nery 
CURIOSITY 
PGCRESSION 
MAGIC POUER 
PSI POUER 
ENDURANCE 


~ 


@ | CHAR ISHA 
spd | INTELLECT 
= STRENGTH 
en 
= CURIOSITY 
UERPONS 
AGGRESSION 
MAGIC POUER 
PSI POWER 
ENDURANCE 
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you “men of violence 
repulse me”, an indication 
that they key to further 
progress is to go unarmed. 


Attacking the creatures 
was fairly ineffective. Most of 
them are better-equipped 
than you to deal with 
physical assault and are best 
left well alone, at least until 
you have accumulated some 
weapons and more power. 
In the early stages I was 
content with exploring the 
different locations and 
collecting all kinds of 
interesting things. 

Once you have discovered 
the clue to opening the 
doors you can wander 
through Trollhold, the 
Hidden Kingdoms, 
Castlefort, the Deep 
Dungeons, and a few other 
places besides. You can save 
your progress at any stage, 


or start a new game, in which 
case all the clues are shuffled 
round and left in different 
places. 

- Dragonhold is a well-put- 
together adventure; the 
arcade element certainly 
gives it an edge over more 
conventional games. It 
should keep you amused, or 
aggravated, for many a long 
evening. 

Dragonhold 
Rubicon 

11 Bannerdale Road 
Sheffield S7 2DJ 


QL Karate 


This is a QL version of the 
martial arts programs with 
names like Way Of The 
Exploding Fish and: Yie Ar 
Kung Fu which have been so 
incredibly successful on the 
Spectrum. | 

The opening screen 
depicts an oriental-looking 
background of pagodas, 
lanterns and icons — real 
ones. The two opponents, 
yours, in green and the 
computer’s in white, battle it 
out in the foreground. The 
various offensive and 
defensive manouvres are 
carried-out simply by 
moving the joystick in a 
given direction, for example, 
pulling straight down makes 
your man drop to the floor 
and lash out with his left 
foot. Diagonally left sends 
him into a particularly agile 
backward somersault. In 


Our man takes some punishment 


HOS 1HH 


LEVEL i 


combination with the fire 
button this gives a total of 16 
possible manouvers. : 

Both men have an energy 
meter which depletes with . 
every blow sustained. When 
the meter reaches zero, in 
your case a life is lost, if you 
are victorious you move on 
to the next screen. The 
different screens provide 
varied and interesting 
backdrops as well as a 
variation in game play. On 
higher levels you are 
attacked by two opponents 
and certain screens require 
you to smash bouncing Ming 
vases. 

The quality of the 
opposition is a little 
disappointing on the early 
levels, it being possible to 
kick your opponent half to 
death before he decides to 
take evasive action. As the 
higher levels are reached 
however, your adversary 
becomes a great deal more 
responsive. 

There are 36 screens in all 
—I managed to complete 12 
in the space of half an hour. 
Although the game becomes 
more difficult as you 
progress, i could not help 
feeling that more of a 
challenge in the early stages 
would have made a 
considerable improvement. 
Karate £14.95 
Eidersoft 
The Office 
Hall Farm 
Ockenden 
Upminster 
Essex RM14 33QH 
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L009 GOW, 


@ Does your micro chat to 70,000 people across the UK? 
















@ Can your micro interview pop stars, hackers and doyennes 
of the computer industry? 


@® Can your micro provide the answer to your technical and 
software problems? 


@® Could your micro send and receive telex’s worldwide? 


@ Does your micro do your shopping for you-—and have it 
delivered to your door? 


@ Is your micro an answering machine, delivering your 


private mail whenever you log-on? 


0) eee 






—------------ 


To: Micronet 800, 8 Herbal Hill, London EC1 
Please send me a brochure on Micronet 800 
Name 


Address 


Micronet 800 
8 Herbal Hill, London EC1R 5Ej 
Telephone: 01-278 3143 


Telephone No_ 


Age _ Micro 


QLW.6.86 
——— SS SS a = oe OME GE EGE GE Gee eon 
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we WITH ALL PRINTERS, QL USERS PRINTERS GUIDE 31/2” SINGLE DRIVE SYSTEM (.75m byte) £95.00 £109.25 
31” DUAL DRIVE SYSTEM (1.5m byte) £169.00 £192.35 


GOVERNMENT AND OFFICIAL OVERSEAS ORDERS WELCOME 8 oben INTERFACE (+ 256KRAM&ITOOLKIT £220.00 £253.00 


DISK INTERFACE (No RAM Expansion) £87.00 £100.05 
KAGA TAXAN KP810 - fRekracie PRICE 


MONITORS 
PHILIPS 7502 GREEN £75.00 £86.25 


MODEMS 
TANDATA (COMPLETE SYSTEM) 




















DOT MATRIX 










PLUS NEAR LETTER QUALITY ExVAT — Inc VAT MICROVITEC CUB 1451/653 £220.00 £253.00 
SHINWA CP A80 + NLQ £165.00 £189.75 

EPSON LX 80 £190.00 £224.25 

CANON 1080A £219.00 £251.85 

JUKI5510 £209.00 £240.35 

CANON 1156 £335.00 £385.25 | 

EPSON FX 85 + £360.00 £414.00 SOFTWARE (V ARIOUS) 

EPSON LQ 800 £515.00 £592.25 : 

EPSON LQ 1000 £546.00 £627.90 

EPSON LQ 1500 £715.00 £822.25 COMPUTERS 





SINCLAIR QL ONLY £173.05 £199.00 











































Ata El tec Peo COMPLETE PACK SPECIAL OFFER 
oon, oo —" OFFER: $356.00 £409.40 THE WORLD'S BEST With EPSON LX80 F/T £619.00 - £711.85 


PRICES ON SINCLAIR QL, 
MICROVITEC CUB 563, With CANON 1156- £842.00 - £968.30 












PRINTER & ALL LEADS 
SO aio: SEE OPER £45000 £817.50 AND INTERFACES With KAGA TAXAN - £581.00 £668.15 
NUTES FROM 156LO 
NOW ONLY 3MINY Ve NGWoopcG 3 
RINTER INTERFACES CTION ESI LO ATE 
ee SYSTEMS £26.05 £29.95 (MANCHESTER 95 MINUT NGWoop 


i) 
LEEDS 20 eet 24 


NB. From East use 





QL COMMUNICATIONS 


GCODE TERMINAL SOPWAIE: ..ccscssscccserccceserscessscesscssccesseveesce £19.95 
Features: 
VIEWDATA TERMINAL — for PRESTEL and MICRONET 
Split baud rate operation (75tx/1200rx) in conjunction with MODAPTOR (see below) — 
necessary for calling PRESTEL. 
Can handle dynamic frames. 
Full emulation of colours, mosaics, separated mosaics, etc. 
Save displayed page to file on microdrive or disk. 
Save entire session to file on microdrive or disk. 
Replay, create or edit saved pages whilst off-line. 
Transmit a saved file. 


* 


ARCADE GAMES 
QL Wanderer 3D 


BUSINESS 
BJ The Return : Impacct Sales Ledger 
BJ In 3D Land ; Impacct Purchase Ledger £45.00 
; Impacct Nominal Ledger £45.00 
Impacct Stock Control £45.00 
Toolkit Impacct (complete) £170.00 
Archiver 
QSpell (MDV Cart.) 


Knight Flight ) Assembler Workbench =e ears £60.00 
Dragonhold 00: Super Astrologer Integrates Accounts... 
Lands Of Havoc Super Sprite Gen. ............. £19.00 


Project Planner 
BRAIN GAMES/SPORTS Cartridge Doctor Entrepreneur 


QL Paint ' Home Finance (Buzz) 


QL Nucleon i LANGUAGES 

QL Peintre . Metacomco Assembler 
QL Remember 4 Metacomco C 

Cosmos : Metacomco Pascal 


Super Backgammon : Metacomco Lisp 
QL Othello 3D : ADVENTURE GAMES Metacomco BCPL 


UTILITIES , . Superforth 
Design Board Il : Nemesis : QL Turtle Logo 
ICE (EPROM) / Classic Adv./M. Quest Micro APL 


+ + + + + F 


VT52 (Scrolling terminal) —for use with Bulletin boards, electronic mail services, mainframe 
computers, etc. 

80 column (4 colour), or 40 column (8 colour) modes. 

VT52 control codes, for fancy editors, etc. 

Additional control codes to set display colours. 

Alternate keypad emulation. 

Upload or download text files using standard utilities on host. 

XON-XOFF protocol. 


ICE (complete) 
Supercharge 


* 


* DQ + + * * 


QL to QL file transfer. Any file transferred from disk or microdrive, including executable 
files, Quill documents, etc. 
Error detecting and correcting protocol. 


GL-MODAPTOR, cosseassiinants cnreoscnsscp eth eds ens ters tedoesev onda sdnsiscen £ 

x Links QL to 300/300, 1200/75, 1200/1200 modem. eg WS2000, PRISM 1000 & 2000, 
NIGHTINGALE, DATACHAT, VOYAGER 11. 

* Includes QCODE TERMINAL software. 

x State modem type when ordering if not 25 way connector. 


RCODE ASSEMBLER a iccssssiccassacedensetartececoutevtessstesastesassenseesens 














Joystick Adaptor Miracle Expanderam 256 


* with screen editor, fast M/c linker, & object library manager. Quickshot I Joystick ; Miracle Expanderam 912 
4 Microdrive Cartridges ; Miracle Centronics Interface 
GQCODE GAMES —-sccssccrscecevesnsieaseceissssnectevcavansniierrsavacsteennasisieestes £4.95 Transform Box + 20 Cartridges QL Computer (Version 2.3 Software 


EIDERSOFT ‘MOUSE’ (including ICE EPROM, and ARTICE) £84.00 
* PHONE FOR SPECIAL ‘PART EXCHANGE’ DEAL! 
CITIZEN 120D PRINTER -+ MIRACLE CENTRONICS INTERFACE £230.00 


* 4 games: sprite, lander, wall-up, moon lander. 


MODEMS: PRISM Modem 1000 with modaptor & software . £69.00 
Voyager 7 with modaptor & software . Phone for details 


GRESHAM DUSK, ssscsissccnccicciceeienuceecncutavdsuenusttnecnsiavvensvnccsavcssie £16.95 
* Up to 8 devices. Fastest available! Fully QDOS compatible. 
* Speeds up any program that accesses microdrives or disks. 
* Use with unexpanded QL or any memory extension. 


QCODE 
42 Swinburne Road Abingdon OXON OX14 2HD 
Telephone: 0235 28359 


PLUS ALL LATEST SOFTWARE AND HARDWARE 
ALL PRICES INCLUDE VAT AND FIRST CLASS POST OR SECURICOR 
TELEPHONE (0636) 79097 FOR PERSONAL ASSISTANCE 
Send Cheque/PO to: 





BYTEBAC 20a SPRING GARDENS, 


NEWARK, NOTTS NG24 4UW 
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In the last 
instalment of our 


QL astrology 





series, John Dice 





be safely 

j installed in 
Microdrives throughout the 
land. This month, I will show 
you how to add the outer 
planets to the program and 
discuss some of the 
problems and solutions to 
finding their positions. 

As I said in part one of the 
series, the difference 
between the inner and outer 
planets is the extent of the 
perturbations which shift 
them from their elliptical 
orbits. Any solution for the 
outer planets which makes 
any claims for even modest 
accuracy must make 
allowance for those 
perturbations. So what are 
they and how do they occur? 
The principle is a very 
simple one. Remember Sir 
Isaac Newton and his apple? 
As legend has it, Sir Isaac was 
musing beneath an apple 
tree one summer’s day when 
one of the fruit fell from the 
leafy boughs and struck a 
considerable blow to his 
head. Realisation then 
welled in Sir Isaac’s 
throbbing pate that masses 
attract each other and the 
force of that attraction is the 
product of the two masses 
divided by the square of the 
distance between them. So 
as the planets whirl around 
the Sun in their orbits, held 
there by the force of 
gravitational attraction, they 
experience ever-changing 
forces in the directions of 
each of the other planets. 

If you take any pair of 
planets and look at the 
perturbations between 
them, you see a wave of 
sometimes frightening 
complexity. There is much 
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shows how to 
calculate the 
positions of the 
outer planets. 


more than just one effect at 
work here. To start, the 
squashed elliptical shapes of 
the orbits mean that each 
time one planet passes 
another, they are invariably 
in different parts of their 
respective orbits, and at 
different distances from 
each other and from the Sun. 
The perturbation is thus 
modified at each encounter 
by a function describing the 
mutual cycle between the 
two planets. 

An extreme example of 
this kind of modification is 
the relationship between 
Neptune and Pluto. Every 
time Pluto nears its 
perihelion, it spends about 
20 years just inside 
Neptune’s orbit, and the two 
of them travel at very similar 
speeds for that period. This 
time round, they have spent 
the last 40 years in sextile, 
only 60 degrees apart, with 
Pluto being speeded and 
Neptune slowed. By now, 
they have knocked sizeable 
dents in each other’s orbital 
elements and it will take 
several orbits of both planets 
for the effects of such an 
encounter to die down. 

Jupiter and Saturn, the 
two heavyweights of our 
solar system, appear to play 
havoc with each other’s 
orbits but in reality they are 
linked so closely that they 
orbit the Sun as a system in 
its own right. Jupiter and 
Saturn are trying to orbit 
each other but not doing so 
because of the Sun’s 
Superior mass. 

A cause of this linking 
phenomenon is the 
resonance which occurs 
between the orbits of some 
planets. For instance, Jupiter 
and Saturn have orbital 
periods which are close to 





being in the ratio 2:5. So 
after five orbits of Jupiter 
and two of Saturn, their 
meeting is at almost the 
same place in their 
respective orbits and the 
perturbing effect builds up. 
It is rather like a singer 
holding the same note as a 
wine glass, except that the 
break-up of the orbit is not 
so dramatic. It means that 
the orbital elements can be 
described adequately only 
in terms of the other planet’s 
position. 

Those resonant points 


travel slowly round the 


CRO 





orbits, producing large 
low-frequency waves called 
the Great Inequalities, 
which for Saturn and Jupiter 
isa 900-year cycle of almost 
one degree’s effect on 
Saturn. All the outer planets 
display those 
disproportionately large 
perturbations of the great 
inequalities. 

You are probably 
beginning to see the 
magnitude of the problem — 
a small, neat set of 
perturbation equations 
applicable to all the planets 
cannot exist. Each planet 





makes its own peculiar 
demands and must be dealt 
with individually. 

So how do we compute 
our way out of this jungle? 
The method par excellence 
is Numerical Integration, 
although it is more suitable 
for creating an ephemeris 
file on disc or Microdrive 
than for calculating positions 
on a given date. An 
ephemeris file is an 
indispensible tool for 
researching more flexible 
methods of astronomical 
computing and those 
interested in this method 
should read Astronomical 
Papers for the American 
Ephemeris Vol XXII, part 1, 
which gives sufficient 
information to generate one 
million years of outer planet 
positions. The computing 
time for sucha task ona QL 
would be about a week. 

Another method capable 
of great accuracy is the 
Variation of Elements 
method, originally due to 
Lagrange. The premise is 
that any perturbed orbit may 


be represented by an ellipse 
whose elements are 
changing constantly. 
Lagrange’s Planetary 
Equations give the rates of 
change of the six orbital 
elements with time in 
response to one disturbing 
body. The formulae are long 
and complex and require 
integration. Recently I have 
encountered an interesting 
extension to this technique, 
Gaillot’s method. He gives 
equations for the 
perturbations to each 
element in terms of the 
mutual cycles with 
neighbouring planets. 
Although a little long- 
winded, it is an efficient 
method to obtain results 
accurate to a few seconds of 
arc. 

To generate a program of 
the kind I give here, the 
following method may be 
adopted. First, obtain 
accurate outer planet 
positions for the period in 
which you are interested. A 
home-made file derived by 
numerical integration 


would do, or use A.P.A.E. 
Vol. XII which gives 
co-ordinates from 1653 to 
2060. The publication of the 
U.S. Government Printing 
Office is also available on 
magnetic tape, though I do 
not know in which format. 
From this data, calculate the 
“osculating” orbital elements 
of Lagrange’s method using 
the formulae on pages 
115-117 of the Explanatory 
Supplement to the American 
Ephemeris, published by 
H.M.S.O. A least-squares fit 
through the osculating 
elements will then give you 
mean elements already 
corrected for the secular or 
long-term perturbations. 
Using ellipses based on 
those mean elements will 
give about five minutes of 
arc accuracy over a short 
period of, say, 100 years. 
The residual period 
perturbations can then be 
identified by Fourier 
analysis. This technique 
sorts Out a complex wave 
into its individual frequency 


coefficients for the sine and 
cosine terms which describe 
them. The process can be 
continued until the desired 
accuracy is reached. The 
listing shown will return 
about one minute of arc 
accuracy for any date this 
century. 

Line 2055 steers all the 
outer planets except Chiron 
to the subroutine just after 
the heliocentric position 
co-ordinates have been 
calculated; 3050 sets up the 
different numbers of 
correction terms there are 
for each planet. Then (3060) 
for the x, y and z co- 
ordinates, a secular term is 
assembled by SUB3000, and 
the pre-set number of 
periodic terms — less one for 
the z terms — are calculated 
and added. The formula 
B«5in(D) + C*xCos(D) 
generates a sine function of 
the correct amplitude and 
phase. The sum of the 
individual terms is then 
added to the heliocentre 
co-ordinates, then back to 


2055 IF P>S AND P<>8 THEN GO SUB 3050 

3050 J=4: H=3: IF P<8 THEN J=S: IF P=6 THEN J=11 
: H=2: L(3)=0 

3060 FOR N=1 TO H 

3070 GO SUB 3000: FOR M=1 TO J-(N=3) 


3080 READ B;C;D: D=D*T: A=A+B * SIN(D)+C*COS(D):: 


NEXT M 

3090 L(N)=A/IE7: NEXT N: XH = XH + L(I): YH = YH 
= L(2): ZH=ZH+L(3): RETurn 

SOSO DATA 225.4928,;3033.688,0,0,4.838E-2;-2E-5;0 
»,0,99.4198,1.0583,0;,0,273.393;1.3383,;0;0;1.3097;, 
-S.2E-3,0,0,5.2029:REMark JUPITER 

S060 DATA 20000, -134000,127000,0;361;-22997,11. 
8019;,-400,-4482;,41.2142,-2295,-14823,24.9146;—-26 
68,-5374,36.8282,11834, 7481,;62.9505 

SO70 DATA 14464,8933,44.3349,-3757,-9160;,117.020 
8,2488,-5460,95.6475,;8453,-4551;28.8206;,502;5979 
»110.1442,-4134,5649,84.2401: REMark JUPITER X 
5080 DATA -10000,-S5000,45000,0,8593,50271,10.152 
6,-1082,-4881,43.82,-22828,-12446,22.9284,5412,1 
1820,41.3781;,7950,-10286;62.8196 

SO90 DATA 5210,-8536,44.937,-8736,3981,117.0802; 
-5795,-1556,95.9826;10544;-7604, 24. 7662;5673;-19 
53,110.6417,5432,;4415,84.2034: REMark JUPITER Y 
5100 DATA 174.2153,1223.508,0;,;0,5.423E-2;,-2E-4;0 
,0,112.8261, .8259,0,0;338.9117,-—.3167,0;0;2.4908 
»-4.7E-3,0,0,9.5525: REMark SATURN 

5110 DATA -14000,26000,0,0,-108694, 22509,21.6805 
340024,-20569,52.97,-51652,-41086, 319256; 31974;- 
71145,11.1806,-9982,12504;,41.2491: REMark SATURN 
X 

5120 DATA -9000;37000,0;0;37834;,128548; 21.6229;- 
18138, -38546, 53.0737;-37709;51711;,;32.032,;-106666 
1-109687,10.6605;-14041,-5278,43.2929:REMark SAT 
URN Y | 
5130 DATA 6000,-2000,0,0;3454,-3615,21.8358,-118 
4,4858,10.8699,2838,972,31.847,-979;204;,52.3093: 
REMark SATURN Z 

5140 DATA 34.61278,713.5756;0;0,; .3822704,-4.6407 


50 


components and finds the main program. 


3E-3,0,0,208.1483, 1.247724,0;0;337.4072,;,2.16330 
7,0,0,6.91118,1.123696E-2,0,0,13.66975:REMark CH 
IRON 

5150 DATA 74.1757:;427.2742;0:;0,;4.682E-2;4.2E-4;0 
,0,73.5222,.5242,0,0;,95.6863,2.0508;0;0,.7726;1E 
-4,0,0,19.2215:REMark URANUS 

5160 DATA 134000,-218600,0,0,-313837 144666; 7.056 
4,;41655,-26742,53.0214,32524,23285,17.3398,17681 
»-3373,21.8061:REMark URANUS X 

5170 DATA -21000,-159000,0,0,90906 ; 284846; 7.3705 
»-25456,-41868, 52.9725,32942,-18943;16.4986;-200 
1,-22913,21.4152:REMark URANUS Y 

5180 DATA -3000,5000,0,0,4095,2869,6.1523,-811;5 
85,52.8398,-999,-35,20.0765:REMark URANUS Z 

5190 DATA 30.13294,240.4552,0,0,9.13E-3,-1.27E-3 
,0,0,130.6842,1.1005,0,0,284.683,-21.6329,0;,0;1. 
7794,-9.8E-3,0,0,30.11375:REMark NEPTUNE 

5200 DATA -1.122E6,1.66E6,-544000,0;42381,-25768 
» 52.976, 895963, 347521,3.091,56732,-45940,11.01135 


»24454,-5198,21.5827:REMark NEPTUNE X 
5210 DATA 1.832E6,-6.718E6;2.726E6;0;,;1.013336E6; 


—-1.634344E6,3.0665, 20346;,-120292;9.4614,-895; 269 
8S,21.2825,-25768;,-42381,52.9812:REMark NEPTUNE 

¥. 

5220 DATA 19600,-119000,111000,0,-697; 717,;53.220 
3,1498,-1325,15.6015,298,633,24.7226:REMark NEPT 
UNE Z 

5230 DATA 229.781,145.1781;0;0;, .24797,2.898E-3;0 
»0,108.944,1.3739,0,;0;13.5366; .2086;,0;0;17.1514, 
-1.61E-2,0;0,39.539:REMark PLUTO 

5240 DATA -—603000,;,5.002E6,;-6.126E6;0;,-490000,; 257 
»>4.7817,42980,23531,52.8939,12717,23817;,;18.7675, 
2429,-6565,24.4748:REMark PLUTO X 

5250 DATA -426000, 730000;,-290000,0,178163,325421 
16.4926, -30969, -37972,53.2256,-71845,; -80637;9.89 
21,-2552,-1576,30.4822:REMark PLOTO Y 

5260 DATA 145000,-928000,1.195E6,0,114138;25722, 
S5.2814,-14852,13094,9.2171,-1441,-1387;174603:RE 
Mark PLUTO Z 
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If you’ve a program that is worthy of consideration, send it to ‘The Progs’, Sinclair 
QL World, 79-80 Petty France, London SW1. We pay for everything published at the 
usual page rates. 





The third — and final part of Rob 
Sherratt’s fast file copy utility. 
The complete program adds 
two new commands to Super- 
Basic, SPOOL and SPOOL_N. 
SPOOL is used for file duplica- 
tion, whereas SPOOL_N trans- 
fers data only and-not file head- 


_ -FCOPY- Pt3 
Rob Sherratt 














Unlike the COPY command, 
control is returned to Super- 
Basic during a SPOOL operation 
— so your QL can get on with 
more important things in the 
meantime. 













‘ 
a ale ae a i. i i. n,n | 


SPL.JOB TST.L 02 


THE SPL_JOB PROGRAM WHICH PERFORMS THE BACKGROUND DATA TRANSFER 


In order for us to have got this far, there must be 2 channels set up and 
open for use - channel_a is the input channel, and channel _b is the output 
channel. The SPOOL / SPOOL_N comrand sets up registers A® to A2, and the 
QD0S operating system sets up registers A4 to Aé as follows : 


A@.L : Channel id for device_a (ie read from this one) 
A2.L : Channel_id for device b (ie write to this one) 
D2.L : Set to 1 for SPOOL_N and set to @ for SPOOL 


A4.L : Points to bottom of data space (relative to Ad) 


AS.L : Points to top of data space {relative to Ad) 
hé.L': Points to base of job control area 


See if file headers have to be transferred (ie the SPOOL command rather 
than SPOOL_N was specified). 


Do we omit copying headers 7... 


BNE DATA_XFR . if so start actual data transfer 
2 
# Read the file header of the microdrive file_a into the buffer at address 
# specified by @(A6,A4.L). Note that D2 and D3 which were initialised to the 
# data buffer length and timeout respectively, are not corrupted by any of 
# the file I/O calls, and so do not need to be reset. 
& 
NOVE thuffer_sp,D2 Buffer length available 
MOVE #-{,D3 Indefinite timeout 
LEA B(Ab,A4.L) Al Base of read buffer 
QD0S trap3,fs_headr Read the file header 
TST.L D8 Did any errors occur ?... 
BNE.S ERROR . if 50, perfora error handling 
4 
# Write the file header to the destination channel (b). Note that D2 and D3 
# which were initialised to the data buffer length and timeout respectively, 
# are not corrupted by any of the file 1/0 calls, and so do not need to be 
* reset. 
* 
NOQVE.L  A®,-{A7) Save channel_a id on stack 
MOVE.L A2,AQ Set destination channel number 
LEA B(AB,A4.L) Al Reset to the base of the read buffer 
QD0S trap3,fs_heads Write the new file header 
TST.L Da Did any errors occur ?.., 
MOVE.L {A7)+,A8 (restore channel _a id) 
BNE.S ERROR . if 50, perfora error handling 
‘ 
# DATA_XFR : Performs the transfer of actual data. Loops until EOF, reading a 
# block from channel_a and then writing it to channel _b. 
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* 


DATA _XFR MOVE 


LAST BLK MOVE.L 


ERROR NOP 


EXIT 





#buffer sp,02 
MOVE #-1,03 

LEA B(AG,A4.L) Al 
Q00S trap3,io_fstrg 
CHP.L ferr_ef,D@ 
REQ.S LAST _BLK 

TStt De 

BNE.S ERROR 


Buffer lencth available 
Indefinite tiaeout 
Point to the base of the read buffer 
Read up to 64 bytes from channel a 
Was it the last tlock (ie EOF) ?... 
. if se, write the last block 
Did any other error occur ?... 
. if so, perform error handling 


Write the block just read to channel_b, then loop back to transfer more 
data until EOF on the input channel is detected. Note that if the input 
channel is a console device (ie keyboard input), then pressing the ESC 


MOVE.L = =AB,-(A7) 
MOVE.L A2,AQ 

LEA B(AG,A4.L) Al 
QD0S trap3,io_sstrq 
MOVE.L (A7)+,A@ 

TST.L Da 

BNE.S ERROR 

BRA.S DATA_XFR 


Save channel_a id on the stack 
Load channel_b id ready for io_sstrq 
Point to the base of the data buffer 
Write 64 bytes to channel_b 
Restore channel _a id 
Did a write error occur ?... 

. if so, perfore error handling 
Loop until EOF(channel_a) is found 


The following code is executed when EOF has been detected during the read 
data operation from channel_a. We have to ensure that the partial data 
block is correctly written to channel _b. 


-AB,-(A7) 
MOVE.L  A2,Aa 

MOVE D1,D2 

LEA Q(AG,A4.L) Al 
DOS trap3,io_sstrg 
MOVE.L = {A7) +, AQ 

TSE. D8 

BEG. S EXIT 


Save channel_a id on the stack 

Load channel_b id ready for io sstrg 
The actual nuaber of bytes read 
Point to the base of the data buffer 
Write the bytes to channel b 

Restore channel_a id 

Did a write error occur ?... 

«ee» 1f no error then exit normally. 


Report any errors that have occurred to the user via Superbasic channel #8. 
If channel #8 is curently awaiting input (unlikely) then channel #1 is used. 
If the user has closed both #@ and #1 then no error is printed. 


Labels aren't allowed on macro calls 


000 vcall ,ut_errd Send an error sessage via DOS 


Comait suicide by killing our own job off ! Note that at this point the 
data transfer has finished as far as SPi_JOB is concerned, but the QD0S 
operating system may still be writing slave blocks to the destination 
aicrodrive. Also the io channels aust be closed by Superbasic (or any other 
progras) 


MOVEG #-1,D1 
MOVEG #803 
QD0S trapi,at_frjob 


Specify job id for our own job 
Generate no error message 
Force remove our own job 


Having killed our own job off, we should never getto the next instruction, 
but the tight loop is provided in case we are reactivated in error by a 
different program 


BRA t Go into a tight loop if we get here 


NUN_JOBS : FUNCTION TO FIND HOW MANY JOBS ARE RUNNING UNDER SUPERBASIC 


This function returns a floating point nurber to Superbasic indicating how 
many machine code programs are present in the job tree headed by Superbasic 
itself. The function only works for jobs that have been spawned directly 
from Superbasic. If a job spawns a sub-job then only the original job will 
be counted by the NUM JOBS function. 


51 





& value of B returned by NUM_JOBS indicates that no jobs apart from Super 
Basic exist at the eoment. — 


100 REMark "MDV EXECUTIVE" written by Greg W. Ha 
rris; November -December 1985 

110 execu 

120 menu 

The first thing to do is to enter supervisor mode to guarantee that the loop ISGVREMar ic S** ERE R ES ESAS ST ERAS EERE EE EE RRM 
which counts the number of jobs can execute before any of the jobs it’s SEEKS execu 

counting decide to disappear ! If a job was to disappear, then successive 140 DEFine PROCedure execu 

calls to at_jinf would fail with “invalid job’. 150 DIM files$(200,12) 


ee ee ee ee 


; 160 windows 

NUM_JOBS TRAP #0 Set supervisor #ode 170 OPEN_NEW #6; 'mdvl1_direct' 
t 180 DIR#6;'mdv1_' 

# Set the Superbasic Job_id so we start scanning the QDOS job list at the top of 190 CLOSE#6 

+ the tree. 200 read file 

5 210 END DEFine execu 


CLR.L ODM 
MOVE.L DL, D2 
NOVE.L #1, D4 


Set job id to Superbasic 215 REMark 2K KK 0K 0K 0K OK 0 0K OOK 0K OK OK OK OK OK OR OK OK OK OK OK KOK OOK OK OK OK KOK K 


Same for job at top of tree EERE EERE ES Sead File 

Initialise job count to -1 220 DEFine PROCedure read_file 

230 OPEN #6; 'mdvi1_direct' 

Scan the job tree: Di is the next job_id in the tree which gets returned 240 INPUT #6,di$ 

after each call to mt_jinf. By feeding Di as an input the next time at_jinf 250 LET count = 1 

is called, we get the next one, and so on until eventually a value of 8 260 REPeat loop 

is returned which indicates we got to the end. The job count in D4 is 270 INPUT #6,d1i$ 

incremented as we go round the loop. 280 IF di$<>'direct'THEN 

290 LET files$(count)=dif$ 

JOB LOOP Adda #1 ,04 300 LET count = count +1:END IF 
BNI.S P_ERROR Program error causing infinite loop 310 IF EOF (#6):EXIT loop:END IF 
ODS trapl,at_jinf Get job information 320 END REPeat loop 


TST.L D8 330 CLOSE #6: DELETE 'mdvl_direct' 

BNE, S J_ERROR Error if job doesn’t exist 340 END DEFine read_file 

TST.L Di Are there any aore jobs ?... 350 REMark 340 

BNE.S JOB LOOP . if so count ther 360 REMaric 0% KK ROKR ROOK OO OOO OIOIOIOIO III IO IK 


OK OK OK OK OK OK OK OK OK OK KOK OK OK OK OK OK OK OK OK OK windows 


We are not worried if @D05 does a task level interrupt now, because the 370 DEFine PROCedure windows 

number of jobs have been counted. Hence reset the supervisor bit in the 380 OPEN #7, scr_512x51a0xO 

status register (we have privilege). 390 PAPER#7;4:CLS #7 

400 INK #7;0:CLS #7 

Reset Supervisor status bit 410 REMark SET UP LOWER AREA OF SCREEN 
420 OPEN #8,con_327x203a185x51 

Reserve 6 bytes of storage space on the arithmetic stack ready to store the 430 PAPER#8,7:INK #8,0:CLS #8 


ee 


EORI #55 SR 


floating point return parameter, 440 REMark set up directory window (9) 
450 OPEN#9,scr_184x203a0x51 
MOVEQ $6.01 Number of bytes required = 4 460 PAPER#9,3:CLS#9 
800 vcall ,bv_chrix Reserve arithmetic stack space 470 END DEFine windows 
MOVE.L  bv_rip(A6) ,Al Set the arithmetic stack pointer 460 -RENGGE. FEC er ee ae ee ee Ce ee ee 
x K KKK ROKK OK KKK KK OK OK OK OK OK menu 
D1 is zero, indicating there are no gore jobs to be counted. Return the 490 DEFine PROCedure menu 


current value of D4,W to Superbasic via the arithmetic stack which is S500 CLS#8 

addressed via @(AS,Al.L). We do this by converting from integer to floating 510 REPeat loop 

point representation (via ri_float arithmetic) first. 520 CLS#7 

530 CSIZE #752,51:AT#7,1,7:PRINT #7,5,"MDV EXECU 
Predecrenent the arith. stack pointer TIVE 
Store integer on steck S540 


Le i oe ee ol 


SUBB.L = #2, Al 


MOVE 14,8106, ALL) AT#8;2,0 





MOVE #ri_float,D@ Specify integer to floating point S50 - PRINT #48;,"'l List/scroll directory for 
90S vcall,ri_exec Execute arithmetic utility progras MDV1"' 
560 PRINT #8\\,"2 Load file from MDV1" 
MOVE.L  Al,bv_rip(Ad) Save the new stack pointer 570 PRINT #8\\> “s Delete a file on MDV1" 
MOVER = «#24 Return argument is floating point type s60 aaa #B\\ 104 Copy a file from MDV1 to 
RTS Noreal exit to Superbasic Bint 
: 590 PRINT #8\\,"S Hard copy of MDV1 direct 
: ie jan eneins ory”’ ; 
i Ge ad to ees cia We ce ate 600 PRINT #8\\,"6 Format cartridge in MD2" 
PERROR MOVEQ = ferr_bp, De Generate parameter error ressage a PRINT #8\\5"7 Duplicate all MDV1 to MD 
a 
+ J_ERROR : an error in the NUM_JOBS function has occurred which will be 620 PRINT #8\\»"8 SuperBASIC™ 
* reported to Superbasic via register D@ which already contains the error Sao" Fer eat 
b cate. 640 WAIT 
: 650 numcheck 
J_ERROR RTS Error exit to Superbasic 660 IF l=lnum THEN EXIT check 
Pa 670 END REPeat check 
END 680 IF ok$>"0" AND ok$< "9'' THEN LET a =ok$ 
690 ELSE LET a =8:END IF 
700 SELect ON a 
710 ON a=l1:cat 
720 ON a=2:LLOAD 
730 ON a=3:del 
740 ON a=4:ccopy 
750 ON a =S:hard 
760 ON a=6:fFORMAT 
770 ON a=7:dup 
780 ON a=8: windows: STOP 


This microdrive utility performs 
many of the housekeeping func- 
tions available on more sophis- 
ticated, but expensive commer- 
cial software. 

The program is menu driven 
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and simplicity itself to use. A 
numbered directory is provided 
from which files can be micro- 
drive copy; delete, format, and 
print. 





790 END SELect 
800 END REPeat loop 


810 END DEFine menu 
B20 REMariic OOOO IC ICICI ICICI KORO ROO 


KKK KK KKK KKK KK KKK KK KKK cat 


830 DEFine PROCedure cat 
840 CLS #7:CLS#9:AT#9,1,2 
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850 CSIZE#9,1;1: PRINT#9,; 'Directory of MDV1'!?!\ 
860 AT#7,1,2:CSIZE #751;1 

870 PRINT #7,'hit any key to pause- or<ESCAPE>' 
880 FOR a = 1 TO count -il 

890 CSIZE#9,0;,0: PRINT #49,,a!files$(a) 

900 LET a$ = INKEY$:IF CODE (a$)=27 THEN RETurn 


910 IF CODE (a$) >0O: PAUSE 

920 END FOR a 

930 CLS#7: CSIZE#7; 1,1: AT#73:1,2:PRINT #7;"Hit 
any key to continue us 

940 END DEFine cat 

950 DEFine PROCedure PAUSE 

960 CLS#7: AT#7,;2,2:CSIZE #7;1;1 

970 PRINT #7, "hit any key to continue" 

980 END DEFine PAUSE 


990 REMark 2K OK OK KK OK OK OK OK OK 0K OK KK OK OK OK OK OK OK OK OK OK OK OK OK OK OK KOK OK OK KOK 
OK ROK KOK OK KOK KOK KK KKK KK KK hard 


1000 DEFine PROCedure hard 
1010 BAUD 9600:OPEN#S5S;SER1 
1020 DIR #S;mdvi_ 

1030 END DEFine hard 

1040 CLS #8 


1050 REMark KKK KKK KK KKK KOK KK KOK KOK KOK OK KOK KOK OK KKK KKK KKK 
KKK KKK KKK OK KK KOK OK OK OK del 


1060 DEFine PROCedure del 

1070 REPeat check 

1080 CLS#8:AT#8,3,3 

1090 INPUT #8;,;''ENTER NUMBER OF FILE TO BE DELE 
TED:"s;ok$ 

1100 numcheck: 

1110 IF l=lnum THEN 

L220 IF ok$< count AND ok$>1 THEN EXIT check 
1130 ELSE 

1140 END IF 

1150 ELSE 

1160 END IF 

1170 END REPeat check 

1180 LET a$=files$(ok$) 

1190 LET a$=a$(1 TO LEN(a$) ) 

1200 PRINT #8:PRINT#8,," PRESS Y IF THE FILE NA 
ME IS ";:a$ 

1210 LET n=ok$ 

1220 WAIT 

1230 IF ok$<>"y" AND ok$<>"y" THEN del 

1240 LET files$(n)="" 

1250 DELETE 'mdvl_'&a$ 

1260 CLS#8: IF n=count-1 THEN count =count-1 
1270 END IF 

1280 CLS #8:rcat 

1290 END DEFine del 


1300 REMark **¥*®*®®® KKK KK KKK KKK KORO ROK ORK KOK OK KKK OK KOK KOK K 


2K OK KOK OOK OK OK OK KOK OK OK OK OK OK OK KOK OK ccopy 


1310 DEFine PROCedure ccopy 

1320 REPeat check 

1330 CLS#8:AT#8,3,1, 

1340 INPUT #8;,"'ENTER NUMBER OF FILE TO BE COP 
IED ;"3o0k$ 

1350 numcheck 

1360 IF l=lnum THEN 

1370 IF ok$<count AND ok$>1 THEN EXIT check 
1380 ELSE 

1390 END IF 

1400 ELSE 

1410 END IF 

1420 END REPeat check 

1430 LET a$=files$(ok$) 

1440 PRINT #8:PRINT #8,,"PRESS 'Y' IF FILE NAME 
IS "sas 

1450 LET n= okr$ 

1460 WAIT 

1470 IF ok$<>"y" AND ok$<>"y"’ THEN ccopy 

1480 COPY 'mdvl_'&ag$ TO'mdv2_'&as 

i490 END IF 

1500 CLS#8:END DEFine ccopy 


1510 REMark ORO OOOO ROR IORI UR OIOROIOIO OIRO KK KOK KCK 


KK KKK OK OK 0K OK KOK OK OK OK OK Kk numcheck 


1520 DEFine PROCedure numcheck 

1530 LET 1=LEN(ok$):LET lnum=0 

1540 FOR a =1 TO l 

1550 IF ok$(a) INSTR"1234567890" THEN LET lnum= 
lnum+1 

1560 END FOR a 


1570 END DEFine numcheck 
1580 REMark KKK KK KKK KKK KOK KKK KKK KK KOK OK KOK OK KOK KO KOK OK OK OK 


KK RRR K KKK KR fformat 


1590 DEFine PROCedure fFORMAT 
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1600 CLS#7:CLS#8:CLS#9:CSIZE#7;2;1:CURSOR#7,164 
»20:PRINT#7; "FORMAT IN MD2" 

1610 CSIZE#8,3,1:AT#8;4,4:PRINT#8, 'ARE YOU SURE. 
?':BEEP 25000;4000 

1620 WAIT 

1630 IF ok$<>"y" AND ok$<>"Y" THEN CLS#8:CSIZE# 


8,0,O:menu 

1640 END IF 

1650 REPeat length 

1660 CLS#8:CSIZE#8,0,0:AT#8,4,3: INPUT#8; "ENTER 
NAME OF CARTDRIDGE TO BE FORMATTED; (max 10 
letters) :";ff% 

1670 IF LEN(£$)<11 THEN EXIT length 

1680 END REPeat length 

1690 REPeat loop 

1700 CLS#8:AT#8;3,1 

1710 INPUT#8;,'How many times do you want MDV2 

formatted?' ;ok$ 

1720 numcheck 

1730 IF l=lnum THEN EXIT loop 

1740 END REPeat loop 

1750 CURSOR#7;244,20:PRINT #7;"'> i 

1760 FOR n=1 TO ok$ 

1770 FORMAT 'mdv2_'&f$ 

1780 NEXT n 

1790 windows 

1800 menu 

1810 END DEFine fFORMAT 

1820 REMark XK KK KK KK KK KKK KK KK KKK KK KK KK KK KK KKK KKK 

lload 

1830 DEFine PROCedure LLOAD 

1840 REPeat loop 

1850 CLS#8:AT#8,3,1 

1860 INPUT#8,,'ENTER NUMBER OF FILE TO BE LOAD 

ED: ';ok$ 

1870 numcheck 

1880 IF l=lnum THEN 

1890 IF ok$<count AND ok$>1 THEN EXIT loop 

1900 ELSE 

1910 END IF 

1920 ELSE 

1930 END IF 

1940 END REPeat loop 

1950 LET a$=files$(ok$) 

1960 CLS#8:AT#8,3,1:PRINT #8;,"PRESS 'Y' IF FIL 

E TO LOADED IS"!a$ 

1970 WAIT 

1980 IF ok$ <>"y"AND ok$<>"Y' THEN LLOAD 

1990 LOAD ‘'mdvl1_'&ag$ 


2000 END DEFine LLOAD 
2010 REMark * % 2% % KKK OOOO IOI Kk 


KK KK KKK KOK KOK OK KOK KOK KK KKK KK dup 


2020 DEFine PROCedure dup 

2040 PRINT#8!'Place the cartridge you wish to b 

e duplicated in MDV1 and then press any key' 

2050 WAIT 

2060 execu 

2070 LET pos="/"' INSTR files$(1) 

2080 LET s=(files$(1) (pos+1 TO pos+3))-(files 

$(1) (1 TO pos-1)) 

2090 PRINT #8!\\'You need'!s;' sectors free on 
your back-up cartridge.'\'If you need to FORMAT 
a new cartridge for the back-up then place the 

cartridge in MDV2 and press "F", If youhave enou 

gh free sectors then press any other key.' 

2100 WAIT 

2110 LET se =CODE(ok$) 

2120 SELect ON se 

2130 ON se=70:fFORMAT 

2140 ON se=102: fFORMAT 
2150 END SELect 

2160 FOR n=2 TO count-1 
2170 COPY 'mdvi_'&files$(n) TO 'mdv2_'&files$ 
(n) 

2180 END FOR n 
2190 menu 


2200 END DEFine dup 
2210 REMarie % % %% RR IKK OO OO 


KR OK KR OK OK OK OK OK OK KOK KOK KOK K KOK OK KOK 


2K OK OK ROK OK OK OK OK KOK OK OK KOK KOK KOK KKK wait 


2220 DEFine PROCedure WAIT 

2236 . LET. okS="" 

2240 REPeat WAITR: LET ok$= INKEY$:IF ok$<>'"" T 
HEN EXIT WAITR 


2250 END DEFine WAIT 
2260 REMarkk % % 12211 ROR OOK 


ORK KOK Ok KK OK KOK OKOK KOK K KKK KKK KK 


END PROGRAM 
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Mushyman 
J M Dower 





Another variation on a favourite a time bonus. Beware of the 
theme from games impressario green mushrooms which are 
J M Dower, author of Hungry poisonous. Type in DEFCHAR 


Harry 
World. This time you must eat set up the special graphics. 
all the blue mushrooms to gain Part 2 follows next month. 


in April's Sinclair QL before running the program to 





10 REMark 7K OOK OK OK OK OK OK KOK KOK OK 


20 REMark * MUSHYMAN 
30 REMark * PROGRAMMED 
40 REMark * FOR THE 


60 REMark * BY J.DOWER 


me 
x 
cs 
SO REMark * SINCLAIR QL * 
* 
x 


7O REMark xx KKK KKK KK KK KK 


SO 3: 
100 
LO 
120° 
125 
130 
140 
145 
155 
160 
170 


init 

map 

screen_init 

title 

mushrooms 

EXTRA_MUSHES 

DEFine PROCedure init 

PAPER #0,0:CLS #0:PAPER O:CLS:INK 4 

AT 5,9:PRINT "INPUT LEVEL OF PLAY":AT 7;9 3 


PRINT "1 (EASY) - 8 (HARD)" 


180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 


x-1: 


AT 9,9:INPUT levels 

IF level$=""" THEN GO TO 170 

level=level$ 

IF level<1 OR level>8S THEN GO TO 170 

CLS 

lives=5:score=0:target=0: bonus=S5000:dir$="s" 
fq=-1* level 

gq=fqt+i1l 

freq=gq*10 

END DEFine init 
key=KEYROW(1) 

X=2:y=2 

moveman 

REPeat loop 

FOR innerloop=1 TO freq 

IF innerloop=1 THEN newmush 
XX=X:3yy=y 

key=KEYROW(1) 

IF key THEN moveman 

IF dir$="left"' THEN moveleft 
IF dir$="right" THEN moveright 
IF dir$="up" THEN moveup 

IF dir$=""down" THEN movedown 
c$=scr$(y>,x) 


IF c$="+"'"' THEN EXIT loop 

IF c$=" " THEN AT y-1;x-1:PRINT " " 

IF c$=""*"" THEN BEEP 5000,266;100,1,;7:AT y-1; 
PRINT " ":ser$(y,x)="" ":score=score+S0O:AT #0 


»1,13:PRINT #0,score:target=target-1:AT #0,3;22: 
PRINT #0,target;" "' 


460 
470 
480 
490 
S500 
510 
520 
530 
540 
550 
S60 
570 
580 
590 
600 
610 
ev Ff 
620 
630 
640 
650 
660 
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IF target=0O THEN clearsheet 
X=xXX!Y=YY 

INK 3:AT y-1,x-1:PRINT "@" 

AT #0,3,8:PRINT #0;,bonus;" " 
IF bonus>O THEN bonus=bonus-10 
NEXT innerloop 

END REPeat loop 

FOR N=1 TO 20 

BEEP O,N»N*484,N+54;0;,N 

INK N:AT y-1,x-1:PRINT"@" 

NEXT N 

AT y-1,x-1:INK 6:PRINT "$" 
BEEP 

lives=lives-1 

AT #0,1,28:PRINT #0,FILL$ (CHR$(124),lives)& 


IF lives>O THEN GO TO 300:ELSE game_over 
DEFine PROCedure clearsheet 

BEEP 0,1,254;3;1 

RECOL 0;0;4;0;,;2;:0;7;0 


670 BEEP 

680 IF bonus=0 THEN GO TO 750 

690 FOR m=bonus TO O STEP -S50O 

700 AT #0,3,8:PRINT #0O,m;" A 

710 BEEP 200,;0 

720 score=score+50:AT #0,1,;13:PRINT #0,score 
730 NEXT m 

740 IF m<>O THEN score=score+m:bonus=O0:AT #0;3;8 
:PRINT #0;bonus;" ":AT #0,1,13:PRINT #0,score 
750 FOR N=1 TO 20 

760 SCROLL -10 

770 NEXT N 

780 IF freq>40 THEN freq=freq-10:ELSE freq=freq- 
5 

790 level=level+1 

800 bonus=5000 

810 AT #0;3,34:PRINT #0,level;" " 

820 GO TO 110 

830 END DEFine clearsheet 

840 : 

850 DEFine PROCedure moveman 

860 IF key=64 THEN hypermush 

870 IF key=16 THEN dir$="right" 

880 IF key=2 THEN dir$="left" 

890 IF key=4 THEN dir$="up" 


‘900 IF key=128 THEN dir$="down" 


910 END DEFine moveman 

920 3: 

930 DEFine PROCedure hypermush 

940 AT y-1,x-1:PRINT " " 

950 yy=RND(2 TO 19):xx=RND(2 TO 36) 

960 IF scr$(yy,xx)<>" " THEN GO TO 950 

970 BEEP 5S00,;1 

980 END DEFine hypermush 

990 : 

1000 DEFine PROCedure moveright 

1010 c$=scr$(y,x+1) 

1020 IF c$<o"#" THEN xx=x+1 

1030 dir$="right" 

1040 END DEFine moveright 

4O50: 8 

1060 DEFine PROCedure moveleft 

1070 c$=scr$(y,x-1) 

1080 IF c$<>"#" THEN xx=x-1 

1090 dir$="left" 

1100 END DEFine moveleft 

L136) £ 

1120 DEFine PROCedure moveup 

1130 c$=scr$ (y-1;,x) 

1140 IF c#<>o"#" THEN yy=y-1 

1250, dir$="up"' 

1160 END DEFine moveup 

1g 4 © 

1180 DEFine PROCedure movedown 

1190 c$=scr$(y+1,x) 

1200 IF c$<>"#" THEN yy=y+l 

1210 dir$="down" 

1220 END DEFine movedown 

iZ30 °$ 

1240 DEFine PROCedure mushrooms 

1250 FOR N=1 TO 60 

1260 blox=RND (2 TO 19):bloy=RND (2 TO 36):IF sc 
r$(blox,;bloy)<>" '' THEN GO TO 1260 

1270 IF blox=2 AND bloy=2 THEN GO TO 1260 

1280 IF RND(1 TO 10)=S AND scr$(blox,bloy)=" " T 
HEN INK 1:AT blox-1,bloy-1:PRINT "+":scr$(blox,b 
loy)="*":target=target+1:AT #0,3,22:PRINT #0,tar 
gets;" ":BEEP 100;153:GO TO. 1310 

1290 ser$(blox, bloy)="+" 

1300 AT blox-1,bloy-1:INK 4:PRINT "+'': BEEP 100,3 
O 

1310 NEXT N 

1320 END DEFine mushrooms 

L330: 3 

1340 DEFine PROCedure newmush (thing$) 

1350 mushx=RND (2 TO 19):mushy=RND(2 TO 36) 

1360 IF scr$(mushx,mushy)<>thing$ THEN GO TO 135 
O 

1370 AT mushx-1,mushy-1:INK 1:PRINT "+":scr$(mus 
hx,mushy)="*"':BEEP 100,15:target=target+1:AT #0, 
3,22:PRINT #0,target;" " 

1380 END DEFine newmush 

1390 3 

1400 DEFine PROCedure EXTRA_MUSHES 

1410 FOR N=1 TO 11-level 

1420 newmush "+" 

1430 NEXT N 
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MICRODRIVE 


EXCHANGE 





In return for a small administration charge (per pro- 
gram — including a royalty for the author), we will 
copy onto blank microdrives any or all of the featured 
programs. 

Each program will be a direct copy of the published 
listing, or an extended version of that listing where 
the program in question was too long to print in full 
(programs for which an abridged version has been 
published are marked with an asterisk). 

It must be stressed that we are not selling the 
software itself, nor providing any guarantee that it 
performs any particular function (though we do check 
every program that is to appear in Sinclair QL World), 
we are merely offering a service to readers who wish 
to obtain Sinclair QL World/QL User programs on 
drive rather than by typing them in straight from the 


page. 


HOW TO ORDER 


Listed below are programs which have appeared as 
listings inside QL World/QL User and Sinclair QL 
World. 3 

To the right of each program entry is a small box, 
which you should mark with a bold cross if you want 
to order that program. 

Once you have put a cross next to all the programs 
you wish to have copied onto microdrive, simply com- 
plete the rest of the order form and send it along 
with your PO/cheque AND BLANK FORMATTED DRIVE 
to: 

MICRODRIVE EXCHANGE, 

Sinclair QL World, 

79-80 Petty France, - 

London SW1. 
If you wish us to supply the drive, please add a 
extra £2.50 for every drive required and mark the 
order form appropriately. 

Please allow 28 days for delivery. 


VRDER FORM 


Author Language Program Name Price Issue Size 
Giles Todd (b) DIY Assembler £5.00 Mar/un 120[ | 
Converts Assembler source into m/c object code 


Richard Cross (AO) Mini Monitor £3.00 Oct 60( | 


Pocket sized monitor with comprehensive facilities 


A Didcock (B) - Connect4 £1.00 Sept 15[ |] 
Pit your wits against the QL 


Shergold & Tose (B) *Golf £2.00 May 35[ | 


From fairway to green on 50 different courses of varying difficulty 


Williams & Holliday (AO) Paladin £5.00 Apr 70[ | 
The basis of our games programming series — a space invaders type game written entirely machine 
code 


Richard Cross (MB) Sprite Animation £2.00 Apr 50[ | 
A subtle blend of machine code and SuperBasic that produces a versatile sprite designer and high 
speed animator 


Steve Deary (B) Pacman £1.00 Mar 20| | 


A reasonably fast rendition of the famous arcade favourite 


Andy Carmichael (B) Family Tree £3.00 Aug 100| | 
Archive program and database for setting up and displaying large family trees 


James Lucy (B) Composer £3.00 Oct 50{ | 
Composer and play sheet music on the QL 


Mathew Capp (B) Miners £2.00 Aug 30[ | 
A nail biting management simulation that puts you in charge of the NCB 


PJ Smith (B) *DIY Adventure £1.00 Feb 60[ | 
Askeleton framework where you simply have to slot in the details to create your bespoke adventure 


R Green (B) Qthello £1.60 Aug 25([] | 
A 3D version of the well known board game Othello for one or two players 


SJ Ackers (B) *Touch Type £4.00 Aug 80/ | 
Touch typing course — 14 lessons, on-screen keyboard, 800+ word vocabulary and WPM readout 


Rob Sherratt (AO) FCOPY £4.00 Mar ’86 80 Ba 
A machine code microdrive utility for turbocharged file copying 


Alan Prior (B) World Map £2.00 Mar ’86 80[ | 
A high resolution multi-coloured map of the world for geography buffs 


B = SuperBasic, AO = Assembler + Object Code (ready to run), MB = Machine Code 
+ Basic loader 


Name 
Address 


No of programs ordered Total cost 


Total sectors 
(max 200 per drive) 
No of drives sent 


No of drives required @ £2.50 each 


Plus postage —packing £ 


Sub total 
Add VAT @ 15% 


TOTAL TO BE SENT 


Please copy onto microdrive the programs above which I have indicated with 
a cross. | enclose a cheque/PO to the value of £ (made payable to 
QL World). | understand that Sinclair QL World only undertakes to SUPPLY 
these programs (copied onto microdrive) and accepts no liability for their 
operation as defined by the author. Neither can Sinclair QL World supply 
additional information about any of the listings other than that originally 
printed. Any article reprints required must be ordered and paid for separately 
at £1 each inclusive of post and packing (£2 overseas). Please mark the 
envelope Dept. LB. 
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ACCESS 


A>Line Computer Systems 
0533 778724 

4-way mains filter/adapter 
Action Computer Supplies 
01 903 3921 

Mains spike eliminator 
Anglo Services Ltd 

0705 671421 

QL Eprom Programmer 





Cambridge Microelectronics Ltd 
0223 314814 

Q-PROM Eprom Programmer 
Cambridge Systems Technology 
0223 323302 

Care Electronics 

0923 777155 

Philips and other monochrome monitors 
Commpak Data 

0792 473697 

Computer Supplies 

146 Church Road, Boston, Lincs 
Joysticks 

Compware 

0270 582301 

Disk drives, memory, monitors etc. 
CST 

0438 352150 

Data Distributors Ltd 

0990 28921 

Kaga, Sinclair Vision 

Eidersoft 

0708 851099 

QL Mouse 

Eprom Services 

0532 667183 

Tony Firshman Services 

01 267 3887 

Mains Spike Filter 


4 Systems 

68 Foxwood Close, Feltham, Middx 
Hardware & software 
Management Science Ltd 

17 West Hill, London SW18 

OL case 

Microworld 

0293 545630/0273 6711863 

Kaga, Epson, Smith Corona, Microvitec, 
Philips, Vision 

Miracle Systems Ltd 

0272 603871 

Modem House 

0392 69295 

Opus Supplies Ltd 

Redhill 65080 
Jvc 

PCML Ltd 

0372 67282/6863 1 

QL+ RAM cards 

Power International 

0705 756715 

Mains spike eliminator 
Printerland 

0484 514105/687875 

Epson, Brother, Kaga, Canon, Juki 
Rubicon 

0742 583665 
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Q-Links 

0436 6660 

Cables & accessories 

Silicon Express 

0533 374917 

Sinclair Research 

0276 685311 

Slave Software 

050 846 8866 

Q-Disc 

SMC Supplies 

01 441 1282 

Joystick adaptor, Centronics & Epson Serial 
Spectrotek 

0669 20565 

QL repair service 

Strong Computer Systems 

0267 231246 

Brother, Shinwa, Epson, Kaga, Mannesman 
Tally, Canon, Daisystep, Smith Corona, 
Microvitec, Philips 

Tandata 

06845 68421 

(OEL) 

Technology Research Ltd 

0784 63547 

Transform Ltd 

089 283 4783 

QL dust cover, microdrive storage box, 
RS232 lead 

Twickenham Computer Centre 

01 891 4991 

Kaga, Ensign, Canon 

Viglen Computers Supplies 

01 843 9903 

Voltmace Ltd 

Park Drive, Baldock, Herts 

Printer stand 





Accountancy Software 
Sinclair Research 

QL Cash Trader 

Adder 

0223 277050 

Q-Doctor, Assembler 
Aleph (Finland) 

358 67 77408 
QL-Numerical, QL/OR 


Bridgebrook Intek 

45 Burleigh Avenue, Wallington, Surrey 
Bank Manager, Diary Manager, Thought 
Manager 

Champagne Computers 
Amsterdam 020 149130 

QL boek, DR Q Leap 

Co-op Soft Ltd 

0272 22223 

Civil/Structural Engineering 
Compugem Ltd 

01 731 7948 

Master Blaster 

Computer One 

0223 862616 

Pascal, Forth, Assembler, Typing Tutor, 
Monitor 

CP Software 

10 Alexandra Road, Harrogate 

Bridge Player 

DA Bandoo 

81 Mount Pleasant, Wembley 
Assembler, Screen Editor 

D. S. Enterprises 

25 Trinity Rise, London SW2 2QP 

01 671 0209 

Sign Designer, RAM Disk Software 


Datalink Systems (Wales) 

097081 360 

CAD PAK, 3D Slime 

Data Management 

0904 760351 

SBUTIL, Mbackup, Terminal, Chargen, 
SBextras, FM 

DataGEN 

0989 67469 

Packages for Solicitors, Accountants, Video 
Libraries, Double Glazing Sales & 
Miscellaneous Credit Control. 

Digital Precision 

01527 5493 

QL Super Sprite Generator, Games Designer, 
Monitor + Dissassembler, QL Super 
Backgammon 

Eidersoft 

0708 851099 

QL Art, Zapper, QSPell, Archiver, B] IT & II, 
Citadel, Spook, ICE, Integ Accounts 
English Software 

061 835 1358 

QL Hyperdrive 

Equate 

2 Ffordd Denwyn, Penyffordd, Chester 
Solar Invaders, Wall Breaker, Draughts, 


Flite Software Ltd 

01 353 7423023 

Equate (maths package) 

GST Computer Systems 

0954 81991 

QL Assembler, 68K/OS, QC C Compiler, 
Macro Assembler 

Hisoft 

0582 696421 

MonQL 

J&D Software 

3 Alfred Road, Lowton, Warrington 
Leisure Genius 

01 935 4622 

QL Scrabble 

Metacomco 

0272 428781 

Assembler, BCPL, Lisp 

Micro Processor Engineering Ltd 
21 Hanley Road, Southwater, Horsham, E 
Sussex 

QL Terminator Emulator 

MicroAPL 

01.622 0395 

Microdeal 

0726 68020 

Havoc, Frogger, Cuthbert 

MPC Software 

0602 820106 

Most popular games 


New Horizon Software 

Fourwinds, 30 Cwm Lane, Rogerstone, 
Gwent 

Pacman, QBERT, Gold + others 


Paddy Software 

0726 832718 

Educational Programs 

PCS 

8 Oak Grove Way, Bridgwater, Somerset 
PCS Utilities 

Peak Electronics 

32 Clifton Avenue, Hartlepool, Cleveland 
QL Colour Quest 

Portfolio Software 

PO Box No 15, London SW11 

Positron Computing 

0554 759624 

Hi-res screen dump 


Printerland 

0484 513105/687875 

Psion Chess, Metacomco Assembler 
Prospero Software 

01 741 8531 

Pascal, Fortran-77 

Psientific Software 

0482 649187 

Keydefine, Q-Calc Calculator, Real Windows 
Psion 

01 723 9408/0553 

Quill, Abacus, Easel, Archive, Psion Chess 
QCode 

42 Swinburne Road, Abingdon, Oxon 
Terminal Emulation, 68000 Assembler/ 
Editor 

Qjump 

Sinclair Research 

QL Monitor, QL Toolkit 

QSoft 

01 499 7417 

Agenda 

Quest 

04215 66488 

Business Accounts 

S&B Software 

20 St Nicholas Street, Diss, Norfolk 
Fantasia Adventure 

Saltgrade Software 

31 Royal Terrace, Edinburgh EH7 

File Manager, File Editor 

Slave Software 

050 846 8866 

Arable Farmer Software 

Strong Computer Systems 

0267 231246 

Super Plant Software 

097 423 223 

Plant & gardening software 

Swansoft 

164 Vicarage Road, Morriston, Swansea 
Space Trek 

Talent Computer Systems 

041 552 2128 

SKUL, WEST, GraphicOL 

TDI Software Ltd 

0272 742796 

USCD Pascal, USCD Fortran 77, Advanced 
Development Toolkit, USCD P-system, USCD 
Prolog 


TR Computer Systems 
093 924 621 
QL Payroll 
Tropic Software 
09274 27497 
Bongolia Escape 
WD Software 
0534 81392 
Hilltop, St Marys, Jersey 
WD Morse Tutor 

BOOKS 
Adder Hutchinson 
0223 277050 01 240 3411 
Century McGraw Hill 
01 240 3411 0628 23431 
Collins Melbourne House 
01 493 7070 01 940 6064 
Duckworth MicroPress 
01 485 3484 0892 39606 
Ellis Horwood Ltd Prentice Hall 
0284 789942 0442 58531 
Granada Sunshine 
01 493 7070 01 437 4343 
Harper & Row 
01 836 4635 
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QL REPAIRS 





KEYBOARD 
MICRODRIVE 


£17.00 
£37.50 
£30.00 
Inclusive of VAT, p&p & insurance. 


Post your poorly QL or ring for quote. 
Overseas queries welcome. 


CLARK HOUSE, HAXBY, 
YORK YO3 8HU 
Tel: (0904) 768853 


Micro_Rack 
Cartridge Tidying Rack 


Fits on the back edge of your QL or Spectrum Plus/ 
128 Keyboard and takes up to 16 cartridges — 
always visible and ready to hand. 


£4.95 inc. p&p from 
DRK Products Ltd 


Bar One, Pipers Lane, Markyate, St. Albans, Herts 
AL3 80F 


* monthly newsletter (36/40 pages) 

* free advice * tutors (Archive etc.) 
* massive software library (mostly free) 
* supports for local groups 

* printer hotline 


* workshops 


Further details from Brian Pain, 24 Oxford St, Stony Strat- 
ford, Milton Keynes, MK11 1JU Tel: (0908) 564271 


American QL 


QL Connection is an authorized distributor of the Sin- 
Clair QL in the United States. We are also suppliers of 
the highest quality hardware and software for the 
sinclair QL. Call or write for our current catalog. 


QL Connection is looking for quality suppliers of QL 
products who wish to reach the American market. 


QL Connection @ 15 Kilburn Court 
Newport, RI 02840 U.S.A. © 401/849-3805 









OPD/QL FILE INTERCHANGE 


Gives your QL the ability to read and write 
microdrive cartridges in the format used by 
the ICL OPD and Merlin TONTO. Allows easy 
transfer of XCHANGE files and SuperBasic 
programs between the OPD and QL. 


Available for £15 from: D. J. WALKER, 22 
Kimptons Mead, Potters Bar, Herts EN6 
3HZ or send SAE for full details. 


QL GARDENING PROGRAMS 
As shown on T.V. HOLLY FERN 
(Archive compatible) ; 
£11.95 each (inc. p&p) 
Same day despatch, 
Send cheques, 
Access Card No’s. to: 
SUPERPLANT SOFTWARE, . 
LLANGEITHO, TREGARON, 
DYFED, WALES 

SY25 6QG or Tel: 097423-223 
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computer Your Complete Sinclair Stockist 


Hardware, Software, Peripherals, 
Printers, Books, Magazines, Accessories 
P.O. Box 5607 e Glendale, AZ 85312-5607 U.S.A. 
1-602-978-2902 e Telex (via WUI): 6501267701 
DEALER INQUIRIES WELCOME 





* DISCOUNTS * For One Month Only 


Orders received before end May 1986 with this coupon receive 
the following discounts: Order over £20 and deduct £2, over 
£100 deduct £10, over £200 deduct £20, over £300 deduct 
£30. Only one discount applies per order. 





Q-PROM £69.95 
EPROM PROGRAMMER 
Resident s’ware. CHECK, READ, FAST BLOW, 
VERIFY, 2764/128 
Add’! EPROM for 27256 £14.95. Q-CART EPROM 
reader £5.95, Demo EPROM £4.95, EPROM eraser 
£22.95, RS232C programmer 2716-512 £149.95. 
Eproms, Cheap. All prices + VAT 
CAMEL PRODUCTS 
One Milton Road, Cambridge CB4 1UY 
Tel: (0223) 314814 Telex: 81574 CML 












> TEL: CREWE (0270) 582301 
SEE OUR ADVERT ON PAGE 26 






We wish to reassure current QL owners that Compware are 
committed to support of the QL and are continuing to develop 
new products. Write or call for prices. 






BUSINESS 


We design and retail data management systems using the Psion Archive run time module. These independent programs are archive 


file compatible and offer a friendly and comprehensive user environment. 


General details and personal company and mail addresses 
For standard QL £14.95; For expanded QL (3 file structures supported) £19.95 


General details, mailing address and over 900 characters of notes 
For standard QL £14.95; For expanded QL (3 file structures supported) £19.95 


Title, author, subject, prices, dates, notes, address 
For standard QL £19.95; For expanded QL (4 file structures supported) £24.95 


MAILFILE 
LIBRARIAN 


Please include your QL memory size and storage type (flp/mdv) on your Mail Order or send a SAE for more details. 


ARK DISTRIBUTION, 62 MANOR WAY, NORTH HARROW, MIDDX HA2 6BY (01-863 1861) 
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COMPUTER CLEANERS 





STOP LOCK-UP AND DATA CORRUPTION 


If this is due to mains interference then our plugs may be the answer 
As well as cutting high voltage spikes they smooth the cut spikes and filter 
RF interference from 1 to 30 MHZ (30db) and up to 130 MHz. 

Some customer comments: 

“With the cleaner ... (locking up) ... is no problem now” — Electrical engineer. 

‘ ,.. these computer cleaners work” — Computer user group. 

“.,. the device is the answer ... (loading problems)” — BBC owner. 

“Lock-ups are cured” — Golf Club QL 

“It seems to work fine. No lockups yet” — for use in Papua New Guinea. 

“Thank you for Unbelievably prompt delivery” — Concrete manufacturer. 

“| shall recommend your product ...” — Bedford customer. 

ADAPTOR ih TSS" PIM SOCKET .:..:..0..0cccccrsrtocerseorsovecsesscenscess £14 inclusive 
ADAPTOR — 2 three pin SOCKET: «.........ccccccccesessecseteacsesesssencase £18 inclusive 
TRAILING 4-WAY SOCKET ..........0.000. ih rae £24 inclusive 
Simply plug either in — no wiring required. 


TONY FIRSHMAN SERVICES 
43 Rhyl Street, London NW5 3HB. 01-267 3887 






















QL STOCKMARKET INVESTOR 


A powerful aid to personal investment analysis 


* CALCULATES COMMISSIONS, END-COSTS, PROFITS. 

* TRADITIONAL AND TRADED OPTIONS, EXERCISE OF OPTIONS. 

* ALLOWS ACCOUNT TRADING, IDENTIFIES LOSSES. 

* STORAGE OF HISTORY OF ONE OR MORE PORTFOLIOS. 

* ath ot UPDATING AND ANALYSIS (FOR CAPITAL GAINS AND CURRENT VALUE) OF 

FOLIOS. 

* USER FRIENDLY, ALLOWS THE USER TO SPECIFY RATES ETC., MENU DRIVEN AND 

STRAIGHTFORWARD TO USE. 


Available only for the QL at £19.95 (Overseas orders add £1). Delivered by return of First Class 
Post from: 


MAURICE COMPUTERS, Apartment 6, St Maurices House, 36 Heworth Green, York YO3 7TA 
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CON TOOLKIT £8 THE FuLLY PROGRAM- 
BLE ICONS SYSTEM USE ICONS LIKE THESE TO ENTER 
OMMANOS YOU CAN PROGRAM THE ICONS TO 00 ANYTHING 


OU LIKE PLUS LOTS OF NEW GRAPHICS COMMANDS SCREEN 
UMPS A PRINT SPOOLER ANO AN ON SCREEN NOTEPAO 
ARACTER TOOLKIT £68 OESIGN ANd | USE YOUR Oli 
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SCREEN TO START YOU arr oe SOREL Line SOME SPRITES LIKE YOU SEE HiRE 
UT YOU CAN EASILY PROGRAM YOUR OWN ALSO INCLUDED ARE ROUTINES TO s 
LiLGW THE CREATION OF MULTI TASKING TUNES LIKE ALL THE BEST GAMES § 

ETE T a a gy L THREE TOOLKITS ON ONE 
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SHADOW GAMES 


has moved to larger premises! Our comprehensive range of top-sel- 
ling games are available through the post or from selected stockists. 
At £12.95 each: AREA RADAR CONTROLLER, SPACE PARANOIDS, 
NIGHT NURSE, BLAST BUGGY, QUAZIMODO. At £14.95, the two- 
game, action-packed: STAR GUARD and GALACTIC INVADERS. At 
£14.95, for a limited time only, the incomparable: PAINT MASTER. 
New titles will soon be announced. WATCH THIS SPACE! 
Good programmers are always in demand. Let us publish your game 
or utility. Write for details. 


SHADOW GAMES, 1/2 The Cottages, 
Maidenhatch, Tidmarsh, nr Reading, 
Berks RG8 8HP 


ARCHIVE NOT FAST ENOUGH 
NOT ENOUGH CAPACITY? 


Using the C programming language and BTree techniques | 
can convert your Archive applications into stand-alone pro- 
grams that run much faster, with virtually no limitation on 
the number of records (files up to the size of the storage 
medium), 
Demonstration programs available on disk or Microdrive. 


L. F. HELLER, 
65 Flanders Mansions, Flanders Road 
London W4 1NF Tel: 01 994 7976 


BREAKTHROUGH SOFTWARE 


REAL WINDOWS!!! £6.50 Inc cartridge & p&p 
Allocates a block of memory to ANY Basic window channel. Save the screen image of any window, re-use the window, then save the new 
screen image and restore the original. Makes professional pull-down menus, possible. Text and graphics are both handled! Real Windows are 
controlled from basic using only three commands (all machine code):- 

BREAKTHROUGH ON-LINE SUPERBASIC MANUAL £6.50 Inc cart/p&p 
Press a key and the screen you are working on is saved instantly! Enter a Superbasic Keyword and all you want to know is displayed on 
screen, return to basic and continue programming! Flip between screens to check syntax etc. Contains ALL Superbasic commands and much 
more. Create your own help files with Quill. 
MULTI-TASKING PRINT SPOOLER £6.50 inc cartridge 
Touch a function Key then type in the input filename or device and the output file/device. It will be sent to the printer or network or even 
another file, whilst you continue with what you were doing. Fully machine code and multi-tasking. Works from within Psion packages! Includes 
command to exit and re-enter Quill, Archive etc from Basic. 
FAST LOADER FOR SUPERBASIC £7.50 Inc cartridge & p&p 

Loads even the longest SuperBasic Program as quickly as professional software packages. Saves and loads all 96K of Systems Variables. 
SuperBasic program, variables, data and machine code routines as a single binary file! EVERYTHING loaded from microdrive cartridge and 
ready to go in one 30 second operation! 

* * * FREE WITH ALL PURCHASES x * * 

SCREEN DUMP, RECALL & 8 M/C BASIC COMMANDS 

* * *& FREE WITH ALL PURCHASES * x x 
HI RES SCREEN DUMP to printer at the touch of a key ** RECALL . . F5 gets back the Ist line you typed (as in archive), edit your errors and 
re-enter the line. ** GETN & GETS Allow you to edit variables on screen, ** MCUR Moves the cursor up, down, left or right. ** TAB Moves 
the cursor to the given column no (left or right). **FONT Allows you to reset the font address. Makes user designed graphics possible. * 
RMODE returns the current display mode. ** DUMP dumps 1 or more lines from the screen to printer. * BVAR returns address of Basic Variables. 


17 SHAFTESBURY WAY, ROYSTON, HERTS, 
SG8 9DE Telephone: (0763) 45482 
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We are the 
only professional Roy 
maintenance company WW 
to take the Sinclair QL 
seriously and provide the 
same level of service you find 
for other business 
professional computers. 

Our experience and facilities 
enable us to provide either a 
full maintenance service for 
multi users or fast one off re- 
pairs within 24 hours, for just 
£35 + V.A.T. including return 
by 24 hour courier. 

Whatever your requirement 
you will find us just the ticket 
for QL repairs. 
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[COMPUTER 
runt REPAIR 
LA CENTRE LTD. 


GILROY ROAD, DISS 
NORFOLK IP22 3EU 
TELEPHONE (0379) 52588 















TOUCH TYPIST TYPING TUTOR for the Sinclair QL 


Features: 200 lessons, graphical output of results, machine code interactive keyboard, PULL DOWN menus, 
SPEED and ACCURACY targets, adustable to 90 wpm and 100% accuracy. 


Supplied on microdrive in 4 cartridge wallet 


ONLY £11.95 


Fast delivery — send cheque or PO made payable to: 


SECTOR SOFTWARE, 45 Cheetham Meadow, Moss Side, 
Leyland, Lancs PR5 3UB Telephone: (0772) 454328 


SPECTRUM to QL. Basic listings trans- 


MIRACLE SYSTEMS £= 







QL MICROVITEC, 


Colour Monitor Cable, 
plus ICE software 
1 YEAR OLD 
£575 RRP, offers around £300 
Phone 01-727-0962 Eve. 















OPD/QL FILE 
INTERCHANGE 


Give your QL the capability of reading and 
writing files on microdrive cartridges that 
are in the format used by the ICL OPD (and 
the Merlin TONTO. Transfer XCHANGE and 
SuperBasic files between the OPD and QL. 
Available for £15 inc. P&P from: 
D. J. WALKER, 22 Kimptons Mead, 
Potters Bar, Herts EN6 3HZ 
or send SAE for full details. 
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ICRO 


ferred. Data transferred. Tasword Il 
documents transferred. 1p per line. £5 
min. charge. Similar work undertaken. 
Phone for information and quotes 0983 
2865694. Solent Systems, 13 Forest 
Road, Winford, |.0.W. 


CLASSIFIED 


FOR DETAILS 
RING 01-222 9090 
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— 14 day money back guarantee on all products — 
— 12 month warranty on all products — 
QL CENTRONICS PRINTER INTERFACE .......::ccsssssscsssesseees £19.50 


* Complete unit including 3 metre cable 
* Plugs into either SER] or SER2: 


QOL SERIAL CABLE .....cscssssssscsssssscsessscsesssscssscscnssensnassssccenenssssases £7.50 
* 3metre cable 


OL JOYSTICK ADAPTOR .......cscssssssssseessssseessseneessenseeesenseeenseeees 



















* Lets Atari/Commodore/Spectrum joysticks plug into CTL ports 
QL SCREEN DUMP .......cccccsssssssssssscnssessecsssesssessesssssssersnsesenssaseees £4.99 
* Copies whole or part of screen to Epson compatible printer | 
QL MODAPTOR ..ccssssssssscssssscsssnscncesscsssssnsscsncoscccsssseceeeesssceessanes £39.00 
* Links QL to 300/300, 1200/75, 1200/1200 modem 

OL EXPANDERAM 256 ....:sccccsssssssssssssesesssssssrenceessseccessssesssssaes £95.00 
* 256K RAM with through connector for DISK I/F 

QOL EXPANDERAM 512 .....sscccsscsssessnsessseesseeessseesnsenseseeenensnenne £125.00 
* 512K RAM with through connector for DISK I/F 

QL RAMDISC SOFTWARE ....ccsscssssssssssesessesessseeessssesessnenecens £14.95 





* Configures RAM as disk lookalike 
* Ideally suited to MS EXPANDERAM 
* Enables Microdrive software to rin much faster with less wear on 













microdrives 
* Fully compatible with Psion packages, SuperBasic etc. 
MIRACLE SYSTEMS LTD Please send CWO. 
AVONDALE WORKSHOPS (UK ORDERS - prices include 
WOODLAND WAY V.A.T. & Carriage). 
KINGSWOOD (OVERSEAS ORDERS - prices 
BRISTOL include Carriage) 
BS15 1OL Send SAE for catalogue. 
Tel: (0272) 603871 Ext 210 

SINCLAIR and QL are trade 








marks of Sinclair Research Ltd 


ADVERTISERS INDEX 
ABC Electronics 
Byte Back 
Care Electronics 
Computer Repair Centre 
Compware 
C.S.T. 
Datalink (UK) 
Datalink Systems (Wales) 
D.S. Enterprises 
Digital Precision 
Eidersoft 
Farmintel 
4 Systems 
Labochrome 
Metacomco 
Micronet 800 
Miracle Systems 
MPC Software 
Printerland 
Prospero Software Ltd 
Pyramide/Rio 


Rubicon 

Strong Computer Systems 
Talent Computer Systems 
TK Computerware Ltd 
Transform 


W D Software 





Sinclair/QL World June 1986 
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4 Systems FREEPOST Feltham TWI3 4BR 
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SUPER Q BOARD 


512K+Disk LF., Printer LF. (Sandy) .... £239 


CUB... 8... ES aac sccts £240 
CUB + Swivel ....... Uiviscbesbstbeshcccessaccc: w+, £260 
TECO GREEN MONITOR ................ Seach £68 
SILICON EXPRESS 312” DUAL 

DISK WITH LE. nooo oiccccccccrccc: wee £275 


MICRO P. (Sinclair) SINGLE 312” : te Be 
WIHLF. £189 i 


No body gives von JL. more than 4 Systems 


SINCLAIR QL PRINTER .. £229 
VISION QL MONITOR ..... £249 
CUMANA COMPLETE DUAL 

DISKS a, E269 
D12K BAM _......2..... £115 
ZOEK AM onecccsecisce. E90 
TANDATA QCOM ............ £129 














POs T FECT Hass, Twi? 48R 





OL SOFTWARE 
Lowest U.K. Prices 
We'll beat any advertised price 

by at least £1.00 

No stamp needed. 
Send FREEPOST with cheque 
to 4 Systems 
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Tole) eke ih a Val: 
_ SANDY SPECIALS ... 


256 K MEMORY UPGRADE His  Sisties Sipe: 2 Siete <> Sian > ee = ee > gee = SA ie 
MODULAR - FITTEDIN SECONDS) /.¢ SRI ge ee mee ae pe | Pa iCirap tereoee Mate 

: : Qt KEYBOARD 
- CAN BE CONNECTED 
; TO THRU-CON RAM 
i N10) 

4 —FLEGANT QL | 

STOM CHIP | . MATCHING CASE - 
I: 








= ere TWIN EXPANSION UNIT 
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OR HI PERFORMANCE 
AND COMPACTNESS 





THRU-CONNECTOR © 


256 K D2RAM tie 












te. RS Pa i PS 7 
oe ws : = ACCESS (1.50 nS) = 
MDE VerS | ed EE ea i ie i OVERALL SIZE 
“ fee | oll ol oof I (100:x 72 mm.) 
qo a ee et Se Sn = 
ae = = 5 NSS | ODE de Sees 
QLFLOPPY DISKSYSTEM = 9 == i |S SS BESSSRSSSSSeeecesesee: 4 : 
, a ace URE RCC ESE aRE EE: or 





mS | MICRODRIVE } : : wos a aed a i — 4. we, 8 Cems’ = as i By ‘ a 3 \ ) 
EMULATION : , a ae << - : 7 
— FULL COMPATIBILITY a eS _ PRR tN | a 
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NFERNAT PSU 3 CONNECTOR 
COMPACT Size“ 3 F© COMPUTER PORT 
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